Напишіть квінку з 1 або більше схемою римування з http://en.wikipedia.org/wiki/Rhyme_scheme при прочитанні. Наступні символи вимовляються вголос:

• будь-які буквено-цифрові слова або символи, які не в коментарі;
• порівняння та арифметичні символи (+ плюс; - мінус; * разів, / ділиться на, | або, || або, & і, && і,! не, = дорівнює, == дорівнює, === дорівнює).

Далі не враховується (не вимовляється вголос):

• будь-які символи, що означають початок або кінець рядкових літералів ("');
• будь-які символи, що означають початок або кінець логічних блоків (() {} []);
• будь-які символи, які означають розмежування змінної, функції або рядка коду (.,;).
• будь-які символи в коментарях;

Правила "розмовного вголос" завжди діють. правила "не розмовляють вголос" поширюються на всі мови, крім Brainfuck, K, J, APL, Befunge та Sclipting. Що стосується APL, Brainfuck, Befunge, K та J, будь-який символ, не зазначений у "правилах розмовного вголосу", підпадає під правило, яке вибирається вище ". Прошивання символів вимовляються так, як вони були б, якби вони були тим китайським символом, при вільному виборі вимови ви використовуєте.

Будь-які символи, які не мають прямого або забороненого вимови, можуть вимовлятися або мовчати. Однак конкретний персонаж або завжди вимовляється, або завжди мовчить. Ви не можете вимовляти # як хештег в одному рядку, а в наступному мовчати #.

Слова можуть вимовлятися на будь-якому діалекті чи мові, але це повинно бути узгоджено в межах однієї строфи (не маючи першого слова вимовлятись шотландським способом, а другого - валлійським).

Тип конкурсу - конкурс популярності. Кінцевий термін - 23 квітня на честь одного з найвідоміших бардів Вільяма Шекспіра, який народився і нібито в той день помер. Переможець - це той, хто отримує найбільше голосів.

Редагувати: оскільки я не думаю, що буде більше поданих заявок, я вирішив закінчити конкурс достроково. Я на хвилину відзначу переможця.

Пакетна AABBA (Лімерік)

Це моя найкраща спроба, але я ніколи не був хорошим у віршах.

Код:

@Echo off || cd \.
If "this"=="a largeish" pot
Type %0 || chef
Color 7f
Goto :eof || shallot

Англійською:

Відлучіть іншу косою точкою компакт-дисків, якщо це дорівнює великій кашпо
Введіть нульовий шеф-кухар
Колір сім f
Перейдіть до шалоту EOF else

Fortran 95 (МакКаррон Куплет)

McCarron Couplet: "AABBABCCDDCDEEFFEF" сучасник переймає класичну схему римування, яку ввів академік Джеймс МакКаррон.

Мій код (який слід зберегти так all.f95, щоб він працював):

character (LEN=100) :: &
bend; logical :: wondered
inquire(file="superstar &
&car",exist=wondered,number=i_r)

open(unit=100, &
file="superstar car")
if (.NOT.(.NOT.(wondered))) then
i_sum = 1; read(100,*) n

i_sum = n + i_sum
rewind(100); else; i_sum = 1
endif; write(100,*) i_sum, 10
codingThis = fun

write(bend,"(I5)") n; call &
SYSTEM ("copy all.f95 all"//&
TRIM(TRIM(ADJUSTL(bend)))//&

".f95"); open(access="append", &
unit=10,file="waterfall")
write(10,*) "foo bar"; end

Він копіює себе в пронумеровані файли, починаючи з all0.f95, а потім all1.f95, all2.f95і так далі ...

На ньому написано:

character len equals hundred
bend logical wondered
inquire file superstar
car exist wondered, number equals IR

open unit equals hundred
file equals superstar car
if not not wondered then
I sum equals one, read hundred N

I sum equals N plus I sum
rewind hundred else I sum equals one
endif write hundred I sum ten
conding this equals fun

write bend I five N call
system copy all F point ninety five all
trim trim adjust L bend

point ninety five access append
open unit ten file waterfall
write ten foo bar end