[Alegun]

Первомай всё же, можно немного и раслабиться, а посему, такая тема.

Есть ящик пива, есть копчёный лещ,
попер паскаль в стихах, такая вещь...

Давно-давно видел хабрахабровский конкурс стихоплётов на паскале и там было примерно такое:

Код:

1 2 3 4

If then begin, begin to do In case interface in do In do, in do... begin to do If else case then interface!

...

Код:

1 2 3 4 5 6 7 8

to return not break   // 4 раза   do while break return do while break return do while break return for if switch case default

...

Там даже чтецы выступали со своими виршами, выглядело как то так:

Ай интежер - Си чар.

Рипит фо Ай зеро ту тен,
ду бегин,
Иф Си плас ейт лесс 'ю' ту энд
Ай плас твелв ин.

[Зеро... Твенти файф] Вен райт эл эн "эй";
Рипит антил кипресст;
Энд Райт эл эн си - риид кей
Антил си лардж вен 'Эсс'!

...

Это ламерское:

Рипит фо Ай равно нулю, ту тен ду трай бегин.
Иф си плюс восемь меньше Ю, и Ай плюс двадцать три.
Ноль — двадцать пять, зен райтелн эй,
Рипит антил кейпрессед.
Энд, райтелн, Си равно ридкей,
Антил Си больше Эс зи энд.

...

Вот и мой вариант:

const or var?
{эфм: быть или не быть?}

Код:

1 2 3 4 5

If then begin, for var begin And case mod while div to do Try except true, in do begin repeat until to unit interface If else const then while case!

...

После бутылки чего покрепче даже пестня попёрла (на мотив битловской ЖПЛ, в смысле Yellow submarine)

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

In then down while is down string as var begin to set And shr mod if of xor file In inline and of interrupt To of label in to then sum with do not for div of then And if end record do uses In asm array procedure;   // припев   if do while is, do while break is do while break is do while break

...

Может, кто продолжит?


З.Ы. Кстати, вот список возможных слов для рифмы:

Код:

1 2 3 4 5 6

uses absolute, label, and, library, array, mod, asm, nil, begin, not, case, or, const, of, constructor, object, div, packed, goto, procedure, do, program, downto, record, destructor, repeat, else, set, end, shl, exports, shr, external, string, file, then, for, to, forward, type, function, unit, if, until, implementation, in, var, inline, while, interrupt, with, interface, xor, inherited;

Эпитафия:

А потом пришли сишники... и прослезились - подобрать рифму для фигурной скобки сложновато...