O desafio é simples:

gerar uma palavra.

Especificações:

• A palavra deve ser pronunciável.
  • Isso é definido como "alternando entre uma consoante e uma vogal".
  • Uma consoante é uma das seguintes letras: bcdfghjklmnpqrstvwxz
  • Uma vogal é uma das seguintes letras: aeiouy
• O Word deve ser gerado aleatoriamente.
• As palavras devem poder conter todas as consoantes e vogais. (Você não pode usar apenas bcdfconsoantes e aeivogais.)
• O Word deve conter 10 letras.
• O código mais curto (na contagem de caracteres) vence.

GolfScript, 32 caracteres

['aeiouy'.123,97>^]5*{.,rand=}%+

Execute-o online .

Ruby: 56 caracteres

([v=%w(a e i o u y),[*?a..?z]-v]*5).map{|a|$><<a.sample}

Exemplo de saídas:

• itopytojog
• umapujojim
• ipagodusas
• yfoqinifyw
• ebylipodiz

Python, 81

from random import*
print''.join(map(choice,["bcdfghjklmnpqrstvwxz","aeiouy"]*5))

Boa sorte em pronunciá-los.

COBOL, 255

Então, eu estou aprendendo COBOL no momento. Usou essa pergunta como alguma prática. Tentei jogar golfe.

É 255 sem o espaço em branco à esquerda e 286 bytes com.

Pelo que vale a pena, isso é executado no Microfocus COBOL para VS2012, e não tenho idéia se será executado em outro lugar.

       1 l pic 99 1 s pic x(26) value'aeiouybcdfghjklmnpqrstvwxz' 1 r
       pic 99 1 v pic 9 1 q pic 99. accept q perform test after varying
       l from 1 by 1 until l>9 compute v=function mod(l,2) compute r=1+
       function random(q*l)*5+v*15+v*5 display s(r:1)end-perform exit

APL (34)

,⍉↑(V[5?6])((⎕A~V←'AEIOUY')[5?20])

JavaScript, 74

for(a=b=[];a++-5;)b+="bcdfghjklmnpqrstvwxz"[c=new Date*a%20]+"aeiouy"[c%6]

Não gera todas as combinações, mas acho que todas as consoantes e vogais aparecem.

JavaScript, 79

for(a=b=[];a--+5;)b+="bcdfghjklmnpqrstvwxz"[c=Math.random()*20^0]+"aeiouy"[c%6]

Versão mais "aleatória".

Ruby: 70 66 caracteres

10.times{|i|$><<["aeiouy"*4,"bcdfghjklmnpqrstvwxz"][i%2][rand 20]}

Exemplo de execução:

bash-4.1$ ruby -e '10.times{|i|$><<["aeiouy"*4,"bcdfghjklmnpqrstvwxz"][i%2][rand 20]}'
izogoreroz

bash-4.1$ ruby -e '10.times{|i|$><<["aeiouy"*4,"bcdfghjklmnpqrstvwxz"][i%2][rand 20]}'
onewijolen

bash-4.1$ ruby -e '10.times{|i|$><<["aeiouy"*4,"bcdfghjklmnpqrstvwxz"][i%2][rand 20]}'
amilyfilil

R: 105 caracteres

a=c(1,5,9,15,21,25)
l=letters
s=sample
cat(apply(cbind(s(l[-a],5),s(l[a],5)),1,paste,collapse=""),sep="")

J (51)

,|:>(<"1[5?6 20){&.>'aeiouy';'bcdfghjklmnpqrstvwxz'

Processamento, 100 99 93 87

int i=10;while(i-->0)"aeiouybcdfghjklmnpqrstvwxz".charAt((int)random(i%2*6,6+i%2*i*2));

Após uma inspeção mais minuciosa da questão, vejo que ela não requer nenhuma saída. Eu ajustei isso de acordo.

Objetivo-C, 129

main(){int i=10;while(i-->0)printf("%c",[(i%2==0)?@"aeiouy":@"bcdfghjklmnpqrstvwxz"characterAtIndex:arc4random()%(6+(i%2)*14)]);}

Com a ajuda de Daniero

(Adoro usar o operador tende a (->)

Java AKA, a linguagem mais detalhada já criada, 176 com a ajuda da maçaneta da porta, Daniero e Peter Taylor (obrigado pessoal!)

class w{public static void main(String[]a){int i=11;while(--i>0)System.out.print((i%2==0?"aeiouy":"bcdfghjklmnpqrstvwxz").charAt(new java.util.Random().nextInt(6+(i%2)*14)));}}

Ungolfed:

    class w {

        public static void main(String[] a) {
            int i = 11;
            while (--i > 0) {
                System.out.print((i % 2 == 0 ? "aeiouy" : "bcdfghjklmnpqrstvwxz").charAt(new java.util.Random().nextInt(6 + (i % 2) * 14)));
            }
     }

}

Javascript, 85

for(r=Math.random,s="",i=5;i--;)s+="bcdfghjklmnpqrstvwxz"[20*r()|0]+"aeiouy"[6*r()|0]

Se executado a partir do console, a saída é mostrada. A exibição explícita seria adicionada alert(s)em 8 caracteres, ainda mais curta que as outras soluções JS.

Obrigado C5H8NNaO4 e Howard!

Javascript, 135 122 96 86 caracteres

s='';c=5;r=Math.random;while(c--)s+='bcdfghjklmnpqrstvwxz'[r()*20|0]+'aeiouy'[r()*6|0]

PHP, 100 caracteres

<?while($i<6){echo substr('bcdfghjklmnpqrstvwxz',rand(0,20),1).substr('aeiouy',rand(0,5),1);$i++;}?>

Ferramentas Unix: 73 bytes

E não garantido tempo de execução :)

</dev/urandom grep -ao '[aeiouy][bcdfghjklmnpqrstvwxz]'|head -5|paste -sd ''

O único problema é que a string gerada começará com uma "vogal" toda vez.

(edit: alterado ' 'para ''no args of paste) (outra edição: -P removido das opções grep, graças ao manatwork )

Pitão, 26 caracteres

J-G"aeiouy"VT=k+kOJ=J-GJ;k

Você pode experimentá-lo no compilador online aqui.

Alguém postou um desafio muito semelhante, mas foi fechado depois que eu fiz uma solução. Eu não percebi, mas essa questão é anterior à criação de Pyth. Enfim, aqui está o detalhamento:

J                             Set string J equal to:
  G                            the entire alphabet (lowercase, in order)
 - "aeiouy"                    minus the vowels
           VT                 For n in range(1, 10):
             =k                   Set string k to:
                k                  k (defaults to empty string)
               + OJ                plus a random character from J
                   =J             Set J to:
                      G            the entire alphabet
                     - J           minus J
                        ;     End of loop
                         k    print k

Toda vez que o loop é executado, J passa de uma lista de consoantes para uma lista de vogais. Dessa forma, podemos escolher uma letra aleatória de J de cada vez.
Pode haver uma maneira de inicializar J no loop ou remover as atribuições explícitas do loop, mas ainda não tive sucesso.

APL 30 26

,('EIOUY'∪⎕A)[6(|,+)⍪5?20]

A explicação é muito semelhante à versão anterior abaixo, apenas reordenada um pouco para resolver a solução.

Nota: ⎕IO está definido como 0

('EIOUY'∪⎕A)[,6(|,(⍪+))5?20]

Explicação:

'EIOUY'∪⎕A    puts vowels in front of all letters.
5?20            for the indexes we start choosing 5 random numbers between 0 and 19
6(|,(⍪+))        then we sum 6 and the random numbers, convert to 5x1 matrix (⍪), add a column before this one containing 6 modulo the random numbers. 
                [[[ this one can be rewritten as: (6|n) , ⍪(6+n)  for easier understanding]]]
,6(|,(⍪+))5?20  the leading comma just converts the matrix to a vector, mixing the vowel and consonants indexes.

Tryapl.org

PHP 79 bytes

<?for($c=bcdfghjklmnpqrstvwxz,$v=aeiouy;5>$i++;)echo$c[rand()%20],$v[rand()%6];

Bastante conciso.

C: 101

main(){int x=5;while(x-->0){putchar("bcdfghjklmnpqrstvwxyz"[rand()%21]);putchar("aeiou"[rand()%5]);}}

Javascript, 104 87

a="";for(e=10;e--;)a+=(b=e&1?"bcdfghjklmnpqrstvwxz":"aeiouy")[0|Math.random()*b.length]

jogava um monte de coisas desnecessárias e simples, ainda não tão legais quanto as de copys

Ah, e esse acabou de aparecer durante o golfe: "dydudelidu"

_{Agora eu tentei um usando os 2 caracteres de uma só vez. Acontece que é quase o mesmo que o segundo dos copys, então não posso contar, também aos 79. a="";for(e=5;e--;)a+="bcdfghjklmnpqrstvwxz"[m=0|20*Math.random()]+"aeiouy"[m%6]}

Braquilog , 9 bytes

Ḍ;Ẉṣᵐzh₅c

Experimente online!

Dá saída como uma lista de letras através da variável de saída.

   ṣ         Randomly shuffle
 ;  ᵐ        both
Ḍ            the consonants without y
  Ẉ          and the vowels with y,
     z       zip them into pairs,
      h₅     take the first five pairs,
             and output
        c    their concatenation.

F # , 166 caracteres

open System;String.Join("",(Random(),"aeiouybcdfghjklmnpqrstvwxz")|>(fun(r,s)->[0..5]|>List.collect(fun t->[s.Substring(6+r.Next()%20,1);s.Substring(r.Next()%6,1)])))

K, 40 bytes

,/+5?/:("bcdfghjklmnpqrstvwxz";"aeiouy")

5?"abc" irá gerar 5 letras aleatórias a partir da string especificada.

5?/: irá gerar 5 letras aleatórias de cada uma das strings à direita, produzindo duas listas.

+ transpõe essas duas listas, fornecendo uma lista de tuplas com um caractere aleatório da primeira lista e, em seguida, uma da segunda lista.

,/ é "arrasar" - fundir todas essas tuplas em sequência.

O K5 pode fazer isso em 33 bytes, construindo o alfabeto de maneira mais inteligente e usando "exceto" ( ^) para remover as vogais, mas o K5 é novo demais para ser legal nesta questão:

,/+5?/:((`c$97+!26)^v;v:"aeiouy")

R, 83 bytes

cat(outer((l<-letters)[a<-c(1,5,9,15,21,25)],l[-a],paste0)[sample(1:120,5)],sep="")

Gere todas as sequências consoantes de vogal possíveis em uma matriz e, em seguida, faça uma amostra aleatória de 5 delas, produzindo uma palavra de 10 letras.

05AB1E , 10 bytes

5FžPΩ?žOΩ?

Experimente online ou imprima$n$quantidade de palavras aleatórias .

Explicação:

Bem direto:

5F      # Loop 5 times:
  žP    #  Push string "bcdfghjklmnpqrstvwxz"
    Ω   #  Pop and push a random character from this string
     ?  #  Output it without newline
  žOΩ?  #  Do the same with string "aeiouy"

Gelatina , 13 bytes

Øy,ØYẊ€Zs5ḢŒl

Explicação:

Øy,ØYẊ€Zs5ḢŒl
Øy,ØY         Makes a list of two lists of characters: [[list-of-vowels-with-y], [list-of-consonants-without-y]]
     Ẋ€       Shuffle €ach.
       Z      Zip those two lists together. [[random-vowel, random-consonant],...]
        s5    Split them into chunks of five (because each pair contains two letters, this splits them into chunks of 10 letters)
          Ḣ   Take the list of 5 pairs.
           Œl Make each of the characters in it lowercase
              Implicit concatenation and print.

Experimente online!