İlham : 1939'da Ernest Vincent Wright adlı bir adam 'e' harfini kullanmadan Gadsby adlı bir roman yazdı .

Göreviniz, alfabenin 26 harfinin tamamını sıralamak için herhangi bir dilde (bir metin tabanlı sözdizimi * olan) herhangi bir dilde (en fazla 5) program yazmaktır. Ancak, her ünlü aeiou için, programlardan en az birinin ünlü harfinin herhangi bir oluşumunu içermemesi gerekir.

Yani olmalı

• programın sözdiziminde hiçbir yerde ' a ' veya ' A ' kullanmayan bir program.
• programın sözdiziminde hiçbir yerde ' e ' veya ' E ' kullanmayan bir program.
• Programın sözdiziminde hiçbir yerde ' i ' veya ' I ' kullanmayan bir program.
• Programın sözdiziminde hiçbir yerde ' o ' veya ' O ' kullanmayan bir program.
• Programın sözdiziminde hiçbir yerde ' u ' veya ' U ' kullanmayan bir program.

Hepsi çıktı vermeli abcdefghijklmnopqrstuvwxyz.

Kazanan, tüm programların uzunluğunun en kısa olduğu çözüm olacaktır.

_{* Çünkü kısıtlama, Piet veya Whitespace’de zor olmaz}

Güncel sıralamalar (06 Mar 2014):

• Bir PL : 11
• B kül : 31
• B efunge : 26
• B urlesque : 12
• B rainfuck : 38
• Cı : 84
• C # : 278/149
• C sıkışması : 6
• C lojure : 81
• D c : 18
• E rlang escript : 75
• F # : 96
• F oyuncu : 264
• F ission : 21
• F orth : 46
• G olfscript : 8
• H askell (tercüman) : 12
• H TML : 50
• J : 17
• J ava : 137
• J. avascript : 92

• K : 9

• K. Otlin : 112

• L ua : 57
• M arbelöz : 96
• M ATLAB : 11
• P erl 5 (CMD hattı) : 23
• P erl 5.10+ : 23
• P erl : 101
• P HP : 31
• P ostscript : 45
• P owershell : 62
• P ython kabuğu : 48
• P ython : 83
• R : 36
• R ebmu : 15
• R uby : 20
• R uby 1.8 : 18
• S cala : 55
• S yaşı CLI : 42
• T cl : 49
• T -SQL : 120
• V BA : 70

Golfscript - 8 karakter

123,97>+

Brainfuck, 38 karakter

++++++[->++++<]>[->+>++++<<]>++[->+.<]

Elbette, beyin hilesi sözdiziminde hiçbir ünlü (veya başka bir harf yoktur) yoktur .

PHP, 31 Bayt

Hayır a, e, ben, o:

<?=~žœ›š™˜—–•”“’‘ŽŒ‹Š‰ˆ‡†…;

Tilde sonra ikili dize aşağıdaki onaltılık gösterime sahiptir:

\x9e\x9d\x9c\x9b\x9a\x99\x98\x97\x96\x95\x94\x93\x92\x91\x90\x8f\x8e\x8d\x8c\x8b\x8a\x89\x88\x87\x86\x85

Bir dil puan tahtası olduğundan, bunu da gönderebilirim:

Yakut (v1.8) 18 bayt

$><<[*97.chr..'z']

Yakut ( 24 22)

Düzenleme: parantezler atlanabilir, 2 karakter daha az:

$><<'%c'*26%[*97..122]

Ruby'de 24 karakter:

$><<('%c'*26)%[*97..122]

Nasıl çalışır

$>$stdoutveya bir takma addır STDOUT. <<Operatörü kullanarak yazabilirsiniz . Terim '%c'*26dizgiyi '%c'26 kez tekrar eder . %Operatör için bir takma ad olarak String tanımlanır sprintf, böylece str % valyazma eşdeğerdir sprintf(str,val). Format karakteri %cbir char değerini bir char'a dönüştürmek için kullanılır. Bu değerler [*97..122], 97'den 122'ye kadar olan değerleri içeren bir dizi oluşturur. Et voilá!

Pyth , 1 Karakter

G

Pyth bazı değişkenleri önceden tanımlıyor. G küçük harf alfabe olarak önceden tanımlanmıştır. Pyth ayrıca her satırı makul bir geri dönüş değeriyle yazdırır.

JavaScript (100)

Hayır 'aeou':

this['\x61l\x65rt']('\x61bcd\x65fghijklmn\x6fpqrst\x75vwxyz')

Hayır, ben:

alert('abcdefgh\x69jklmnopqrstuvwxyz')

K 9

_26#.Q.b6

K, 10

"c"$97+!26

K, 14

.:".Q.","c"$97

J, 26 23 17 16 karakter

Bir saat kadar J'nin çamaşır çekmecesinde dolanmaya başladıktan sonra sonunda a.ve u:fiilleri ortadan kaldırmanın bir yolunu buldum .

2(3!:4)96+#\26$1

Önceden:

a.{~96++/\26$1
u:97+i.26

Hile için randomra sayesinde #\.

R, 17 + 19 = 36 karakter

ae yok (17):

intToUtf8(97:122)

no iou (19):

cat(letters,sep="")

Bash (38)

Hiç ünlü yok.

/*/*/*ntf "/*/?ch? {\x61..z}"|/*/b?sh

C, 90 88 84 karakter

Kullanarak derleyin gcc -nostartfiles

b;_exit(){for(;b<26;)printf("%c",b+++97);}    // 42 chars, works for a, u
b;_start(){putchar(b+++97)>121?:_start();}    // 42 chars, works for e, i, o

Golf yazısı, 10 karakter

26,{97+}%+

Yakut, 20 karakter

$><<[*97.chr..?z]*''

• 97.chr 'a' demenin ayrıntılı bir yoludur
• .. Aralık belirtir
• ?z "z" demenin daha kısa bir yolu
• [*range]nedenleri aralığı, bir dizi değerleri Al uyarıyla
• *''aynıdır join(''); Tüm dizi değerlerini birbirine yapıştırır.
• $><< Perlicism: stdout'a yazdır.

dc: 18 17 karakter

97[dP1+dBD>m]dsmx

Ve orada cesur bir karakter öldü.

Powershell, 75 62 karakter

Düzenleme: Kod uzunluğunu önemli ölçüde azaltmak için -f (String.Format) ve dizi dizini kullanılır.

'{0}bcd{1}fgh{2}jklmn{3}pqrst{4}vwxyz'-f"$(1|gm)"[8,10,0,5,31]

Nasıl çalışır

gmiçin bir takma ad get-members, böylece 1|gmdeğer üyeleri döner 1ait, System.Int32tip:

PS C:\> 1|gm
   TypeName: System.Int32
Name        MemberType Definition
----        ---------- ----------
CompareTo   Method     int CompareTo(System.Object value), int CompareTo(int value)
Equals      Method     bool Equals(System.Object obj), bool Equals(int obj)
GetHashCode Method     int GetHashCode()
...

"$(1|gm)"alfabeyi tamamlamamız için gereken tüm sesli harfleri içeren yukarıdaki listenin bir dize gösterimini döndürür: " int C omp ar eTo (System.Object val ue) ..."

BASH: 40 karakter

• Hiçbir aeioukullandı.
• Hiçbir joker karakter kullanıldı.

`tr c-y '\141-w'<<<'rtkpvh %s c'` {b..z}

Haskell, 12

['\97'..'z']

Yoksa bu hile yapmak mı? :)

MATLAB, 12 + 20 = 32 karakter

Eiou yok (12):

char(97:122)

Aeou yok (20)

fprintf('%s',97:122)

Perl'de

ünlü olmadan da mümkündür

ama Ruby'de olduğundan daha zor. Bu toplam 101 karakter kullanıyor ancak cmd satır (perl -e) çağrısı gerektirmiyor.

`\160\145\162\154\40\55\145\40\42\160\162\151\156\164\40\123\124\104\105\122\122\40\141\56\56\172\42`

=> Sonuç: abcdefghijklmnopqrstuvwxyz

'Benzer görünen' PHP Çözümünün aksine , bu gerçek bir programdır . Program kodu çözülmüş okur:

perl -e "print STDERR a..z"

Sekizlik değerlerin kodlanmasından sonra, çalıştırma sırasında `` (backticks) tarafından başka bir perl yorumlayıcısı aranır. Geri tepmeler çıkışı tüketir, bu nedenle STDERR'ye basılır.

Kodlama sprintf tarafından yapılır:

my $s = q{perl -e "print STDERR a..z"};
my $cmd = eval(
       '"' . join('', map sprintf("\\%o",ord $_), split //, $s) . '"'
       );

ve eval'd kodlayan olan (ters tırnakların içinde) yayınlanan programı:

"\160\145\162\154\40\55\145\40\42\160\162"
"\151\156\164\40\123\124\104\105\122\122"
"\40\141\56\56\172\42"

Saygılarımızla

rbo

Perl 5, 22 karakter

(1) sadece ave e10 karakter içerir (5.10+ gerektirir, komut satırından çalıştırın):

-Esay+a..z

(2) sadece 'i', 12 karakter:

print v97..z

Komut satırından kaçmasına izin verilmiyorsa use 5.01;say a..z, ilkini 7 karakter ve bir tane daha sesli harfle kullanmanız gerekir, ancak yine de 'i' işareti yoktur, bu nedenle toplam 29 karakter.

APL (Dyalog) ( 11 13)

Bir APL yazı tipine ihtiyacınız olabilir. Bunun Unicode olması gerekiyor ama önizleme yok ...

Sadece U(ve belki de ⍳Yunanca sayılar varsa):

⎕UCS 96+⍳26

(Budur: [quad]UCS 96+[iota]26)

Sadece A:

⎕A

Python 2, 83

Hayır a , ben , o veya u ; 47 :

x=97;s='';exec"s+=chr(x);x+=1;"*26+"pr\x69nt s"

Hayır e ; 36 :

print"abcd\x65fghijklmnopqrstuvwxyz"

Python 2, 175 karakter

Not: daha önceki python yanıtından farklı olarak çıktı almak için yazdırır .

'E' kullanır, ancak hayır, i, o, u - 63 61 59 65 ( iküçük harfe yanlış hareketi düzelt ) 115 karakter (boşluklardan kurtulun).

exec('fr%cm sys %cmp%crt*\nf%cr x %cn r%cnge(97,123):std%c%ct.wr%cte(chr(x)),'%(111,105,111,111,105,97,111,117,105))

(Başlangıçta, boşluk ekleyen virgülle baskı kullandı; ayrıca büyük harflerle de basıldı. Şimdi çıktı olarak 'abcdefghijklmnopqrstuvwxyz' için katı gereksinimler görüldü; böylece import ifadesi eklendi).

'E' kullanmaz (a, i, o, u; küçük uzantı için önemsizden a, u'dan kurtulabilir) - 61 60 karakter

import string
print string.__dict__['low%crcas%c'%(101,101)]

JavaScript (154)

(1) Sadece i(99 karakter) içerir :

t=this;s=-t+t+t.b;z=s[1]+'bcd'+s[7]+'fghijklmn'+s[4]+'pqrst'+s[21]+'vwxyz';t[s[1]+'l'+s[7]+'rt'](z)

(2) Sadece aeou(55 karakter) içerir :

t=0;s=''+t.b;alert('abcdefgh'+s[5]+'jklmnopqrstuvwxyz')

Gösteri: http://jsfiddle.net/SvN5n/

piton 159 117

Diğer python post'unda belirtildiği gibi, en zor kısım, çıktı almanın tek yolunun kullanmak printveya sys.stdout.writeher ikisini de içeren i olduğu gerçeğiyle ilgilidir . 2 programla yapmalısınız (bağımsızdır ve çıktıyı oluşturmak için python interaktif kabuğunu kullanmayın):

Bu sadece 55 karakter için i kullanır:

print"%cbcd%cfghijklmn%cpqrst%cvwxyz"%(97,101,111,117)

Bu, i'yi 104 karakter için kullanmaktan kaçınır:

eval("sys.stdout.wr%cte"%105,{'sys':eval("__%cmport__('sys')"%105)})("%c"*26%tuple(range(97,123))+"\n")

EDIT: Büyük atılım !!! Eval (veya hatta exec) kullanımının biraz hile olduğunu ve gerçekten rekabet ruhunda olmadığını düşünüyordum. Her neyse, yerleşiklerin arasında dolaşırken i kullanmadan yazdırma işlevini elde etmenin bir yolunu buldum. Öyleyse 68 karakter için önlenecek bir program:

vars(vars().values()[0])['pr%cnt'%105]("%c"*26%tuple(range(97,123)))

Ancak bu, o da önlediğinden, bu, 49 karakter için yalnızca a, e, u'dan kaçınanla eşleştirilebilir:

print"%cbcd%cfghijklmnopqrst%cvwxyz"%(97,101,117)

Ruby 196 164 44 47

$><<"\x61bcd\x65fgh\x69jklmn\x6Fpqrst\x75vwxyz"

Ruby, 22

$><<[*?`..?{][1,26]*''

Hiçbir mektup yok :)

VBA: 76 kaba kuvvet, 116 'hile yapmadan' (çıktıda newlines kabul edilebilirse 98)

Standart İşlevler

VBA'nın ayrıntılı olması sayesinde, bunun standart bir kod modülünde 'E' veya 'U' olmadan yapılabileceğine inanmıyorum ...

• " E "
• "F u nction"
• "S u b",

Acil Fonksiyonlar

Mellamokb'un varsayımına dayanarak, işte işlev bildirgesi (dışlama SUBve FUNCTION) ( işte satırsonu çıktıda kabul edilebilirse , 116 karakter , 98 ):

Aşağıdakiler ne 'e' ne 'a' kullanmaz ( hemen pencerede çalıştırılacak şekilde biçimlendirilmiş 43 karakter ):

b=65:Do:z=z+Chr(b):b=b+1:Loop Until b=91:?z

Aşağıdakiler ne 'ben' ne 'a' ne 'u' kullanmaz ( hemen pencerede çalışmak üzere biçimlendirilmiş 33 karakter ):

For b=65 To 90:z=z+Chr(b):Next:?z

Aşağıdakiler ne 'a' ne 'o' ne 'u' kullanmaz ( hemen pencerede çalıştırılacak şekilde biçimlendirilmiş 40 karakter ):

b=65:While b<91:z=z+Chr(b):b=b+1:Wend:?z

Çıktıda yeni satır karakterlerine izin verilirse, yukarıdaki örnekler daha kısa olabilir:

( 37 karakter )

b=65:Do:?Chr(b):b=b+1:Loop Until b=91

( 27 karakter )

For b=65 To 90:?Chr(b):Next

( 34 karakter )

b=65:While b<91:?Chr(b):b=b+1:Wend

Kaba kuvvet

İle Running w0lf Ruby cevap

( Hemen pencerede çalışmak üzere biçimlendirilmiş 76 karakter ):

?Chr(65)&"BCD"&Chr(69)&"FGH"&Chr(73)&"JKLMN"&Chr(79)&"PQRST"&Chr(85)&"VWXYZ"

Rebmu : 15 karakter

Ctc'`L26[pn++C]

Rebmu okumak, başlamak için her zaman biraz tedirgin olmayı gerektirir :

c: tc '` l 26 [pn ++ c]

Sonra kısaltmaları genişletmeye yardımcı olur:

c: to-char-mu '`
loop 26 [
    prin ++ c
]

Küçük harf a'nın selefi için bir karakter değişmezi kullanmak daha açık olurdu:

c: #"`"
loop 26 [
    prin ++ c
]

Ama bu "lapa" değil, bu yüzden kelimenin tam anlamıyla bir kelimeyi karaktere dönüştürmek aynı amaç için geçiyor. En sevdiğim gibi, çoğu Rebmu'da olduğu gibi, sıkıştırmaya rağmen mantıklı bir programın ruhuna sahip olması. (Golfscript'in yanıtı daha kısadır, ancak bir programcının kodlama sırasında genellikle düşüneceği şekilde eşleşmez.)

<> <(Balık) - 22 karakter

<> <'O' karakter basmak için kullandığından, bu zorluğun yapması imkansız görünüyor. Neyse ki, balık çalışma zamanında kendi kodunu değiştirebilir. Bu, yazdırma talimatını koda eklememe izin verdi.

Bu kod ünlülerin hiçbirini kullanmaz:

'`78'+11pv
:X:'z'=?;>1+

Kodu burada çalıştırabilirsiniz