Написать программу, которая выводит на экран четверостишие:
Унылая пора! Очей очарование!
Приятна мне твоя прощальная краса –
Люблю я пышное природы увядание, 
В багрец и золото одетые леса.
А. С. Пушкин

begin
  Writeln('Унылая пора! Очей очарование!');
  Writeln('Приятна мне твоя прощальная краса –');
  Writeln('Люблю я пышное природы увядание,');
  Writeln('В багрец и золото одетые леса.');
  Writeln('А. С. Пушкин');
end.

Для турбо Паскаль еще первая строка Uses CRT;