Натхнення : у 1939 році людина на ім’я Ернест Вінсент Райт написав роман під назвою Гідсбі, не використовуючи букву «е».

Ваше завдання - написати набір (до 5) програм будь-якою мовою (яка має текстовий синтаксис *) для виведення всіх 26 букв алфавіту в порядку. Однак для кожного голосного аеоу, щонайменше, одна з програм не повинна містити жодної появи голосного.

Так що повинно бути

• програма, яка не використовує " a " або " A " ніде в синтаксисі програми.
• програма, яка не використовує ' e ' або ' E ' ніде в синтаксисі програми.
• програма, яка не використовує « я » або « я » ніде в синтаксисі програми.
• програма, яка не використовує " o " або " O " ніде в синтаксисі програми.
• програма, яка не використовує ' u ' або ' U ' ніде в синтаксисі програми.

Усі вони повинні вивести abcdefghijklmnopqrstuvwxyz.

Переможцем стає рішення, коли тривалість усіх програм найкоротша.

_{* оскільки обмеження не було б великою проблемою в Piet або Whitespace}

Поточний рейтинг (06 березня 2014 р.):

• A PL : 11
• Б зола : 31
• B efunge : 26
• Б урлеск : 12
• B дощ : 38
• C : 84
• C # : 278/149
• C джем : 6
• C lojure : 81
• D c : 18
• Ескрип E rlang : 75
• F # : 96
• Ж актор : 264
• F ісія : 21
• F orth : 46
• G olfscript : 8
• H askell (перекладач) : 12
• H TML : 50
• J : 17
• J ava : 137
• J avascript : 92

• K : 9

• K otlin : 112

• L ua : 57
• М арбел : 96
• M ATLAB : 11
• P erl 5 (cmd лінія) : 23
• P erl 5.10+ : 23
• P erl : 101
• P HP : 31
• P ostscript : 45
• P власний розмір : 62
• P ython shell : 48
• P ython : 83
• Р : 36
• R ebmu : 15
• R uby : 20
• R uby 1,8 : 18
• S cala : 55
• S вік CLI : 42
• T cl : 49
• T -SQL : 120
• V BA : 70

Гольфскрипт - 8 символів

123,97>+

Brainfuck, 38 символів

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

Зрозуміло, що в головному синтаксисі немає голосних (або будь-яких інших літер) .

PHP, 31 байт

Ні a, e, i, o, u:

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

Двійковий рядок після тильди має таке шістнадцяткове представлення:

\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

Оскільки є таблиця мовних таблиць, я можу також подати цю:

Ruby (v1.8) 18 байт

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

Рубін ( 24 22)

Редагувати: круглі дужки можна опустити, на 2 символи менше:

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

24 символи в Рубі:

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

Як це працює

$>є псевдонімом для $stdoutабо STDOUT. Ви можете написати це за допомогою <<оператора. Термін '%c'*26повторює рядок '%c'26 разів. %Оператор визначається на рядок в якості псевдоніма sprintf, так str % valеквівалентно записи sprintf(str,val). Символ формату %cвикористовується для перетворення значення char в char. Ці значення виходять із [*97..122]якого створює масив, що містить значення від 97 до 122. Et voilá!

Піф , 1 персонаж

G

Pyth визначає певні змінні. G визначений як малий алфавіт. Pyth також неявно друкує кожен рядок з розумним значенням повернення.

JavaScript (100)

Ні "еу":

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

Ні 'я':

alert('abcdefgh\x69jklmnopqrstuvwxyz')

К, 9

_26#.Q.b6

К, 10

"c"$97+!26

К, 14

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

J, 26 23 17 16 символів

Через годину або близько того, копаючись у ящику нижньої білизни J, я нарешті знайшов спосіб усунути a.і u:дієслова.

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

Раніше:

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

завдяки спалаху випадкових за #\трюк.

R, 17 + 19 = 36 символів

немає ае (17):

intToUtf8(97:122)

немає йо (19):

cat(letters,sep="")

Баш (38)

Немає голосних взагалі.

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

C, 90 88 84 символів

Компілювати за допомогою 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

Гольфскрипт, 10 символів

26,{97+}%+

Рубін, 20 ч

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

• 97.chr - це складний спосіб сказати "а"
• .. задає Діапазон
• ?z - коротший спосіб сказати "z"
• то [*range] викликає діапазон для Splat аль це значення в масиві
• *'' те саме, що join('') ; він склеює всі значення масиву разом.
• $><< Перліцизм: друк до stdout.

DC: 18 17 символів

97[dP1+dBD>m]dsmx

І там помер відважний персонаж.

Powershell, 75 62 символи

Редагувати: Використовується -f (String.Format) та індексація масиву, щоб значно зменшити довжину коду.

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

Як це працює

gmпсевдонім для get-members, тому 1|gmповертає членам значення 1, яке має System.Int32тип:

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)"повертає рядкове представлення вищевказаного списку, який містить усі голосні, які нам потрібні для завершення алфавіту: " int C omp ar eTo (System.Object val ue) ..."

БАШ: 40 символів

• Немає aeiou використовується.
• Ніякі символи не використовуються.

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

Хаскелл, 12

['\97'..'z']

Або це обман? :)

MATLAB, 12 + 20 = 32 символи

Немає ейоу (12):

char(97:122)

Без ае (20)

fprintf('%s',97:122)

У Перлі,

можливо також без голосних

але набагато складніше, ніж у Ruby і т. д. Для цього використовується 101 символ, але не вимагає виклику рядка cmd (perl -e).

`\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`

=> Результат: abcdefghijklmnopqrstuvwxyz

На відміну від «схожого на вигляд» рішення PHP , це справжня програма . Програма розшифрована:

perl -e "print STDERR a..z"

Після кодування до восьми значень під час виконання клавіші `` (зворотними посиланнями) викликається інший інтерпретатор perl. Повернення посилань споживало б результат, тому він друкується на STDERR.

Кодування виконується sprintf:

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

і кодування eval'd - це програма, розміщена (в рамках заднього плану ):

"\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"

З повагою

rbo

Perl 5, 22 символи

(1) містить тільки aі e, 10 символів (потрібно 5.10+, запустити з командного рядка):

-Esay+a..z

(2) містить лише "я", 12 символів:

print v97..z

Якщо не дозволяється запускати з командного рядка, тоді вам потрібно скористатися use 5.01;say a..zдля першого, вартістю 7 символів та ще однією голосною, але у нього все ще немає "я", тож це призводить до дійсного запису у загальній кількості 29 символів.

APL (Діалог) ( 11 13)

Можливо, вам знадобиться шрифт APL. Це повинен бути Unicode, але попереднього перегляду немає ...

Тільки U(і, можливо, ⍳якщо рахувати грецькі голосні):

⎕UCS 96+⍳26

(Ось: [quad]UCS 96+[iota]26 )

Тільки A:

⎕A

Пітон 2, 83

Ні a , i , o чи u ; 47 :

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

Ні е ; 36 :

print"abcd\x65fghijklmnopqrstuvwxyz"

Python 2, 175 символів

Примітка: друкує для виведення на відміну від попередньої відповіді python .

Використовує 'e', ​​але немає a, i, o, u - 63 61 59 65 (виправити помилково iперейти в малі регістри) 115 символів (позбутися пробілів).

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))

(Спочатку вона використовувала друк із комою, яка вставляла пробіл; також надрукована великими літерами. Тепер побачив суворі вимоги до 'abcdefghijklmnopqrstuvwxyz' як вихід; тому додаючи заяву про імпорт).

Не використовує 'e' (використовує a, i, o, u; може тривіально позбутися від a, u для невеликого розширення) - 61 60 символів

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

JavaScript (154)

(1) Вміщує лише i99 символів:

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) Вміщує лише aeou55 символів:

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

Демонстрація: http://jsfiddle.net/SvN5n/

Пітон 159 117

Як вже згадувалося в іншому пітонному дописі, найважча частина стосується того, що єдиний спосіб виведення - це використання printабо те sys.stdout.write, що вони містять i. Це потрібно зробити з двома програмами (які є автономними і не використовують інтерактивну оболонку python для створення результату):

Цей використовується лише для 55 знаків:

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

Цей уникає використання i для 104 символів:

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

EDIT: Масивний прорив !!! Я думав, що використання eval (або навіть exec) було чимось обманом і не справді в дусі змагань. У будь-якому випадку, перебираючи вбудовані я знайшов спосіб отримати функцію друку без використання i. Ось ось програма Avo-i (і o) для 68 знаків:

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

Але оскільки це також дозволяє уникнути o, це може бути поєднане з тим, що уникає лише a, e, u на 49 знаків:

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

Рубін 196 164 44 47

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

Рубі, 22

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

Жодних листів :)

VBA: 76 грубої сили, 116 без "обману" (98, якщо у виводі прийнятні нові рядки)

Стандартні функції

Завдяки багатомовності VBA, я не вірю, що це можна зробити без 'E' або 'U' у стандартному модулі коду ...

• " E nd"
• "F у nction"
• "S u b"

Безпосередні функції

Працюючи з припущенням mellamokb, тут без декларації функції (виходить з ладу SUBта FUNCTION) ( 116 знаків , 98 якщо нові рядки прийнятні у виході):

Нижче не використовується ні 'e', ​​ні 'a' ( 43 символи , відформатовані для запуску в безпосередньому вікні):

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

Нижче не використовується ні "i", ні "a", ні "u" ( 33 символи , відформатовані для запуску в безпосередньому вікні):

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

Нижче не використовується ні 'а', ні 'o', ні 'u' ( 40 символів , відформатованих для запуску в безпосередньому вікні):

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

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

( 37 символів )

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

( 27 символів )

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

( 34 символи )

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

Груба сила

Запуск з відповіддю Ruby у відповіді w0lf

( 76 символів , відформатованих для запуску в безпосередньому вікні):

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

Ребму : 15 символів

Ctc'`L26[pn++C]

Читання Ребму завжди вимагає трохи нерозумного початку для початку:

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

Тоді це допомагає розширити скорочення:

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

Більш очевидним було б використання буквеного символу для попередника нижнього регістру a:

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

Але це не "кашка", тому перетворення слова буквально в символ переходить з тією ж метою. Що мені подобається в цьому, як і більшості Rebmu, - це те, що він має дух розумної програми, незважаючи на стиснення. (Відповідь Golfscript коротша, але не відповідає тому, як програміст зазвичай думає при кодуванні.)

<> <(Риба) - 22 символи

Оскільки <> <використовує 'o' для друку символу, цей виклик видається неможливим. На щастя, риба може змінити власний код під час виконання. Це дозволило мені додати інструкцію до друку до коду.

Цей код не використовує жодного голосного:

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

Ви можете запустити код тут