Enigma:

Escreva um programa curto de três linhas que:

• possui 5/7/5 sílabas por linha quando lida em voz alta
• produz um haiku quando executado.

Um exemplo de um programa com a estrutura correta, mas com saída não haiku, é (Python):

>>> for x in range(3):
...     print "EXTERMINATE HUMANS"
... # I am a Dalek.
... 
EXTERMINATE HUMANS
EXTERMINATE HUMANS
EXTERMINATE HUMANS

(O comentário é um pouco obscuro.)

É lido em voz alta como:

para x no intervalo três

impressão HUMANOS EXTERMINADOS!

Eu sou um Dalek.

Qualquer idioma é aceitável. Para fins de leitura em voz alta, símbolos como !@#$%^&*()_+podem ser ignorados, se você quiser, ou pronunciados em voz alta, admitindo algo como Waka Waka Bang Splat . (Tenho certeza de que haverá uma entrada Perl como !***(!:, )(*@@@#, )_(*)!.)

Pontos extras se o código ou a saída forem especialmente engraçados ou especialmente zen.

Edit: Se o seu idioma requer clichê antes que ele possa fazer algo interessante ( #include <iostream>?), Fico feliz em ignorar o clichê.

Aceitei o haiku Common Lisp de Paul Richter com o argumento de que me fez rir por uns bons cinco minutos.

Menção honrosa pela flexão criativa de regras de Timwi ( saída do compilador ?!) e pela linha extremamente memorável"Static void. I long for you."

Agora esta pergunta termina;

Muitos outros haikus aguardam.

Continue postando!

Lisp comum

Parênteses estão em silêncio!

Programa:

((lambda (&rest foo) 
   (list foo (cons 'truly foo) foo))
 'this 'is 'lisp 'haiku)

Leia como:

lambda and rest foo
list foo cons truly foo foo
this is lisp haiku

Saída:

((THIS IS LISP HAIKU) (TRULY THIS IS LISP HAIKU) (THIS IS LISP HAIKU))

C #

Programa:

#warning Lonesome
class _{
    static void Eye(long forYou='
        ){ /* My program ends here. */ ;}}

Ler:

Warning: Lonesome class.
Static void. I long for you.
My program ends here.

Saída do compilador :

#warning: 'Lonesome'        (read: hash warning lonesome)
Empty character literal     (read: empty character lit’ral)
Newline in constant

Piet, 867 executando blocos coloridos

Grande Prêmio, você diz? Isso tem tamanho de codel 2.

Saída:

SPRING EVER RETURNS
NEVER EXACTLY THE SAME
THIS IS NOT A QUINE

Esse desafio foi divertido! Eu escrevi um codificador de instruções Piet que pega instruções e as traduz em um script Piet. É um trabalho curto a partir daí gerar código para imprimir uma determinada string. Eu dediquei uma pequena (mas eficaz) quantidade de esforço ao jogar golfe no código Piet enquanto usava apenas instruções de codel único.

Eu então fiz uma fonte de pixel. Para cada pixel em um personagem, divido-o em 4 codels: 2 pretos e 2 executados. O primeiro codel encontrado não é de execução, portanto, se um segmento de um caractere tiver n pixels, por exemplo, isso corresponderá a 2 * n * -1 instruções.

As linhas abaixo dos lados invertem o ponteiro de direção e movem-no para baixo em 2 pixels, levando-o para a próxima linha. Assim, as instruções são revertidas em todas as outras linhas.

Depois que eu tive o código para produzir "texto incorporado no texto", ficou divertido. Provavelmente escrevi 20 haiku pelo caminho, mas acabei me estabelecendo. Ajustando a fonte; adicionando / removendo serifas, cantos arredondados, alterando altura / largura etc., pude alterar o número total de pixels não brancos na imagem, de modo que o código Piet se encaixasse exatamente no texto da imagem.

Bônus! Você pode fazer seu próprio haiku quinelike! http://pastebin.com/zxc9V3UX

Perl

$_
= "Repeating myself"
;print"$_\nis like $_.\n$_.\n";

Como ler em voz alta:

dollar underscore
equals repeating myself
print nis like line noise.

Saída:

Repeating myself
is like Repeating myself.
Repeating myself.

INTERCAL

O INTERCAL possui recursos limitados de saída, mas "recursos limitados" nunca me impediram de escrever um programa INTERCAL!

DO READ OUT #18
+#3301
+#214
PLEASE GIVE UP

Por favor, leia isto como:

Do read out eighteen,
Three thousand three hundred one,
Two hundred fourteen.

(Observe que meu clichê está no final do programa, e não no começo.)

O programa produz a saída:

XVIII

MMMCCCI

CCXIV

Que, quando falado em voz alta, diz:

Ex vee eye eye eye,
Em em em cee cee cee eye,
Cee cee ex eye vee.

CoffeeScript

Com a língua firmemente na bochecha, apresento o CoffeeScript:

here = "my haiku"
were_doomed() unless 1 is 1
alert Date.now()

Pronunciado:

Here is my haiku
We're doomed unless one is one
alert date dot now

Se o tempo estiver correto (!), Sua saída poderá ser, por exemplo, 1337181872717, pronunciada:

one three three seven
one eight one eight seven two
seven one seven

Considerando que minha primeira execução foi um microssegundo de uma resposta válida do haiku, acho que isso é zen o suficiente para se qualificar!

NB: Eu ficaria feliz em ouvir alternativas suficientemente zen para minhas duas primeiras linhas (reconhecidamente fracas).

J

Programa:

p:i.4
*:*:*:i.3
!8

Leia (substituindo nomes verbais):

Prime Integers Four
Square Square Square Integers 3
Factorial Eight

Saída (ler números em voz alta):

2 3 5 7
0 1 256                          (Read: Zero One Two-Fifty-Six)
40320                            (Read: Forty Three-Twenty)

Python

Código:

for _ in range(1,3):
    print 'Hi ' * 5, 'there ' *  2 * (-1+_) 
print 'I now', 'go ' * 3

Como ler:

for in range one three
print hi five there two one plus
print i now go three

Saída:

Hi Hi Hi Hi Hi  
Hi Hi Hi Hi Hi  there there 
I now go go go 

Exemplo de trabalho: http://ideone.com/hDniW

logotipo

Aqui está um procedimento Haiku que também é um procedimento quine (fácil por causa da capacidade de introspecção do logotipo)

to better_yourself
  printout "better_yourself
end ; as you began

Leia como

Para melhorar a si mesmo
Imprima a cotação melhor você mesmo
Terminar como você começou

Rubi

"A ruby haiku.
Why, yes, it is."; print open(
__FILE__).read #this now, please.

Leia como:

A ruby haiku.
Why, yes, it is. Print open
file. Read this now, please.

Infelizmente, não flui muito bem. Em minha defesa, são 12:50 da manhã ...

JavaScript (não funciona no Firefox)

             (function haiku() { with (
console) log ((('' + haiku). // output
replace)     (/[ !-@{-~[-^]+/gim, ' ')); void haiku })()

funciona, exceto o
mecanismo javascript do mozilla , e mostra a
ortografia após a execução

Python

(Leia apenas o primeiro nível de parênteses (não o segundo)).

Código e como ler:

for e in range(3):                      # for e in range three
    if True is False: what = then       # if true is false, what is then?
    print "oh " * (5 + 2 * (e & 1))     # print oh times _seven_

Saída, provavelmente o haiku mais básico do mundo:

oh oh oh oh oh
oh oh oh oh oh oh oh
oh oh oh oh oh

Python (2 entradas)

Entrada 1: Um haiku no tempo

Você precisa salvar isso em um arquivo e executá-lo no mesmo diretório. Este haiku muito lentamente se imprime na tela, um poema em palavras e tempo.

from time import sleep
for line in open(__file__):
  print line; sleep(len(line))

Entrada 2: Um haiku sem simbolismo

Isso é semelhante ao acima, mas foi uma tentativa de escrever um haiku Python que usava apenas palavras-chave e colchetes mínimos ou substituições de símbolos (por exemplo, =pronunciado como "é").

if __file__ is not None:
 for line in open(__file__):
  print not False and line

Tcl

Aqui está um exemplo de auto-documentação e auto-saída:

catch {me as I make}
proc unknown args {puts [read $args]}
[open [info script]]

Vim

ia0 <esc><c-x>
YpA-<esc>
px5<c-x><c-x>

leia como

i a zero x
Y p A hyphen escape
p x five x x

Escreve:

a-1
a-1-
-7

leia como:

a negative one
a minus one negative
negative seven

Python 3

print(print.__doc__[:15])
print(print.__doc__[13:][:13])
print(print.__doc__[32])

Leia como:

print print doc one five
print print doc one three one three
print print doc three two

Impressões:

print(value, ..
..., sep=' ',
\

Leia como:

print value dot dot
ellipses, sep equals blank
reverse solidus