[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;

Эпитафия:

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

[PhoeniX]

Фигня всё это - оно даже не скомпилируется. Как-то на IT Happens было куда лучше:

Код:

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

if (newGame) resources.free(); s = FILENAME + 3; setLocation(); load(s); loadDialog.process();   try { setGamerColor(RED); } catch(Exception e) { reset(); } while (notReady) { objects.make(); if (resourceNotFound) break; }   byte result; // сменить на int! music(); System.out.print("");

[Alegun]

Это же "скобяная" поделка!

Эпитафия действует!

[PhoeniX]

Когда вы так говорите, создаётся впечатление, что вы - типичный школьник в интернете, ненавидящий знаки препинания (ибо "мы не на уроке")
// Без обид

[Alegun]

Та лан те, Феникс,



//без этих самых

[Bargest]

Как-то на IT Happens было куда лучше:

Читал в полной уверенности, что C++. Только на последней строке догнал, что это Java.

[M.A.D.M.A.N.]

На перл какой-то стих (или чето наподобии того) есть, который даже работает.

[NumLock]

http://www.99-bottles-of-beer.net/la...-perl-737.html

[ChinYan]

Сообщение от M.A.D.M.A.N.

На перл какой-то стих (или чето наподобии того) есть, который даже работает.

Не этот? Вики говорит, что какие-то версии Перла его успехно интерпретировали:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

BEFOREHEAD: close door, each window & exit; wait until time.  open spellbook, study, read (scan, select, tell us);  write it, print the hex whole each watches,  reverse its length, write again;  kill spiders, pop them, chop, split, kill them.  unlink arms, shift, wait & listen (listening, wait),  sort the flock (then, warn the "goats" & kill the "sheep");  kill them, dump qualms, shift moralities,  values aside, each one;  die sheep! die to reverse the system  you accept (reject, respect);  next step,  kill next sacrifice, each sacrifice,  wait, redo ritual until "all the spirits are pleased";  do it ("as they say").  do it(*everyone***must***participate***in***forbidden**s*e*x*).  return last victim; package body;  exit crypt (time, times & "half a time") & close it,  select (quickly) & warn your next victim;  AFTERWORDS: tell nobody,  wait, wait until time;  wait until next year, next decade;  sleep, sleep, die yourself,  die at last

Оно было написано изначально для Perl 3, и по словам самого Ларри [Уолла], он испытал моральное удовлетворение, когда стихотворение не прошло синтаксический анализатор в Perl 5.