Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 09:38
607
Написать программу, которая выводит на экран четверостишие:Унылая пора! Очей очарованье!
Приятна мне твоя прощальная краса –
Люблю я пышное природы увяданье,
В багрец и золото одетые леса.
А. С. Пушкин
1
ответ
Program gt;
uses crt;
begin
writeln('Унылая пора! Очей очарованье!');
writeln('Приятна мне твоя прощальная краса –');
writeln('Люблю я пышное природы увяданье,');
writeln('В багрец и золото одетые леса.');
writeln(' А. С. Пушкин');
end.
если не хочешь чтобы на окне crt появился убери uses crt;
uses crt;
begin
writeln('Унылая пора! Очей очарованье!');
writeln('Приятна мне твоя прощальная краса –');
writeln('Люблю я пышное природы увяданье,');
writeln('В багрец и золото одетые леса.');
writeln(' А. С. Пушкин');
end.
если не хочешь чтобы на окне crt появился убери uses crt;
0
·
Хороший ответ
4 апреля 2023 09:38
Остались вопросы?
Еще вопросы по категории Информатика
Укажите виды информации по форме представления. ...
Создать массив a из десяти целых чисел, принадлежащих промежутку [0; 25). Вывести полученный массив на экран. Подсчитать k- количество элементов масси...
Помогите пож)) 1) Почему при уменьшении и увеличении растрового изображения ухудшается его качество? 2) В чем состоят основные различия между формата...
Дан фрагмент электронной таблицы. Какие из формул, приведённых ниже, могут быть записаны в ячейке A2, чтобы построенная после выполнения вычислений ди...
Перепишите программу на языке Паскаль, исправив ошибки: Program primer Var a,b: integer; Begin ; ReadLn( a,b); s=a+b; m:=a*b; d:=a:b; WriteLn(s); Writ...