Поэмы Гомера "Илиада" и "Oдиссея"

Например, русские сказки :)

while репка не вытащена do

   begin

      добавить еще одного участника;

      тянуть-потянуть;

   end;

кричать ('Вытянули репку!!!');

end.

while не встретилась лиса do

   begin

      катиться-покатиться;

      встретить зверя в лесу;

      спеть о том, как от бабушки ушёл и от дедушки ушёл;

      спеть о том, как от всех предыдущих зверей ушёл;

      пообещать и подавно уйти;

      покатиться дальше;

   end;

   попасть лисе на зубок;

end.