- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
Program L_121;
uses crt;
Var N : integer;
b,z : string;
f1 : text;
Begin
assign(f1,'Единица измерения.txt');
writeln('1 Соотношение конкретной единицы измерения длины');
writeln('2 Соотношение единиц измерения длины');
writeln('3 Обозначение единиц измерения длины');
writeln('4 Назначение единиц измерения длины');
read(N);clrscr;
reset(f1);
case N of
1:begin
write('Введите единицу измерения : ');
read(b);clrscr;
readln(f1,z);writeln(z);
if b='миллиметр' then begin readln(f1,z);writeln(z); end;
if b='сантиметр' then begin readln(f1,z);readln(f1,z);writeln(z); end;
if b='дециметр' then begin readln(f1,z);readln(f1,z);readln(f1,z);writeln(z);end;
if b='метр' then begin readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);writeln(z);end;
if b='километр' then begin readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);writeln(z); end;
end;
2:begin
readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);
end;
3:begin
readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);
writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);
end;
4:begin
readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);readln(f1,z);
readln(f1,z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);readln(f1,z);writeln(z);
end;
end;
End.
Follow us!
Астрофизики эту линию очень любят, потому что по ней можно как красное смещение исследовать, так и плотность водорода в облаках измерять.
Переход через эту Дверь разительно отличался от перехода через Дверь предыдущую. Зоров ощутил, как его мгновенно и умело разобрали на мельчайшие праатомы и тут же собрали вновь; ощущение это было не то чтобы болезненным, но крайне неприятным, что-то вроде падения в бесконечную темную пропасть в ночном кошмаре. И еще он почувствовал удар по глазам от мощной красно-черной вспышки... смешение цветов было поистине невероятное: жуткий, как и все абсолютное, черный цвет, и красный всех мыслимых и немыслимых оттенков, от инфрабагрового до ультраалого...
Александр Соболь, Валерий Шпаков. Все цвета радуги (Оракул Вселенной - 3).
Полный ярости Голос вырвавшегося:
— Жругр! Не лукавь! С демиургом нет торга!
Ты мне ответишь за все головой!
Голос Жругра:
— Знаю! Борюсь! Но ток демиурга
Парализует мне центр волевой.
Голоса раруггов:
— Круча Небесной России извергла
Целую рать просветленных на бой.
Возглас Великого Игвы:
— Вижу, как грады других демиургов
Сонмы Синклита сзывают трубой.
Голоса ангелов мрака:
— Инфрабагровое пламя померкло!
Даймоны, ангелы стали стеной!
Д. Л. Андреев. Железная мистерия.
Фиолетовое свечение повсюду, сполохами, похожими на солнечные протуберанцы. Инфралиловый очень темный и очень яркий одновременно, воспринимается густым и насыщенным. Инфрабагровый выглядит как черный, но однозначно понимаешь, что это красный. Цвета окружения - красные, желтые, оранжевого много. Кирпичный цвет повсеместно. Кстати, местами красиво даже. Зелени и синевы нет в принципе, хотя холодный серый иногда на контрасте воспринимается как болотно-зеленый.
Отсюда: http://great-igva.livejournal.com/10151.html
Во всем есть свет
В крови детей разбрызганной по стенке дома
Разводы красные плывут, как облака зарей ведомы
В разбитых стеклах перелив
Горящих радостно пожаров
И даже там где Бог лишь миф
В мирах что созданы для кары
В инфрабагровом легок лет
На черных крыльях отблеск Бога
Он поводырь а я как Лот
Бреду за ним в холмах пологих.
Но лишь направлю к небу взгляд
Два солнца с Солнцем говорят.
Феликс Комаров: http://www.stihi.ru/2005/11/15-1520
P.S. Почему Гугл нашёл только один источник (в предыдущем комментарии ссылка на ЖЖ), а Бинг вообще молчит? Большинство примеров найдены Яндексом и тупым поисковиком go.mail.ru.