Поэт поэт


13

Напишите квинну с 1 или более схемой рифмы на http://en.wikipedia.org/wiki/Rhyme_scheme при прочтении. Следующие символы произносятся вслух:

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

Следующее не учитывается (не произносится вслух):

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

Правила «говорят вслух» применяются всегда. правила «не говорят вслух» применяются ко всем языкам, кроме Brainfuck, K, J, APL, Befunge и Sclipting. В случае APL, Brainfuck, Befunge, K и J, любой персонаж, не упомянутый в «правилах вслух», подчиняется правилу «выбирай последовательно», описанному выше. Скользящие символы произносятся так, как если бы они были китайским иероглифом, со свободным выбором произношения, которое вы используете.

Любые символы, которые явно не разрешены или запрещены, могут свободно произноситься или храниться в молчании. Тем не менее, конкретный персонаж либо всегда произносится или всегда хранит молчание. Вы не можете произносить # как хэштег в одной строке и молчать # в следующей.

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

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

Изменить: потому что я не думаю, что будет больше заявок, я решил закончить конкурс рано. Я отмечу победителя на мгновение.


2
+1, хорошо сформулировано. Мне нравится, как ты назвал Склиптинг особенным случаем.
Kaya

Ответы:


9

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

Это моя лучшая попытка, но я никогда не разбирался в стихах.

Код:

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

По-английски:

Echo off else CD slash dot
Если это равняется большому банку
Тип ноль остальное повар
Цвет семь f
Перейти к EOF else shallot


1

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

Маккаррон Куплет: «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
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.