95 мов (усі символи використовуються!)
(TODO: ще пару відповідей, які я запланував, але не здійснив)
1. КОБОЛ - забороняє A
PROGRAM-ID.g.PRODECURE DIVISION.DISPLAY"Ununtrium".
Друкує Ununtrium.
2. REBOL - забороняє B
REBOL[]prin"Tellurium"
Друкує Tellurium.
3. bc - забороняє ^
a=0^0
"Strontium"
Друкує Strontium.
4. Д - забороняє D
void main(char[][]D){printf="Ruthenium";}
Друкує Ruthenium.
5. Java - забороняє E
enum E{E;{System.out.print("\x41luminium");}}
Друкує Aluminium.
6. Скала - забороняє F
val F=print("Plutonium")
Друкує Plutonium.
7. Іржа - забороняє G
fn main(){let G:u8;print("\x41mericium")}
Друкує Americium.
8. Нім - забороняє &
discard 0&0
echo "Neptunium"
Друкує Neptunium.
9. C # - забороняє C
class V{static void Main(){System.Console.Write("Neodymium");}}
Друкує Neodymium.
10. Бурлеск - забороняє%
,1 1.%vv"Manganese"Q
Друкує Manganese.
11. Немерле - забороняє I
Nemerle.IO.print("Magnesium")
Друкує Magnesium.
12. Ада - забороняє J
procedure gnat.io.J is begin put("Palladium");end;
Друкує Palladium.
13. Іти - забороняє |
package main
func main(){if 1|1>0{print("Germanium")}}
Друкує Germanium.
14. К - забороняє `` `
`0:"Ytterbium"
Друкує Ytterbium.
15. Ерланг - забороняє /
-module(test).
-export([m/0]).
m()->io:put_chars("\x42eryllium").
Друкує Beryllium.
16. Пролог - забороняє :
m:-write('\102erkelium').
Друкує Berkelium.
17. Малий розмова - забороняє K
K:=0.'Lanthanum'display
Друкує Lanthanum.
18. PARI / GP - забороняє L
print(Potassium)
Друкує Potassium.
19. REXX - забороняє M
M=0
say "Tungsten"
Друкує Tungsten.
20. LilyPond - забороняє N
#(let((N 0))(print"\x46levorium"))
Друкує Flevorium.
21. Дуга - забороняє Q
(let Q 1(pr "\x41ntimony"))
Друкує Antimony.
22. Загальний LISP - забороняє R
(let((R 0))(princ"Tantalum"))
Друкує Tantalum.
23. Clojure - забороняє U
(def U)(pr'Selenium)
Друкує Selenium.
24. Логотип - забороняє Z
to Z
end
pr[Scandium]bye
Друкує Scandium.
25. Гровий - забороняє W
print"Samarium";W=0
Друкує Samarium.
26. Асимптота - забороняє X
write('\x52ubidium');int X=0;
Друкує Rubidium.
27. Октава - забороняє Y
Y=0;disp Yttrium
Друкує Yttrium.
28. гнулот - забороняє V
V=0;prin"Vanadium
Друкує Vanadium.
29. Кайт - забороняє z
z=0;"\x4eobelium"|print;
Друкує Nobelium.
30. Білка - забороняє _
print("\x4eitrogen");local _=0;
Друкує Nitrogen.
31. Карі - забороняє v
v=v;main=putStr"\x4cutetium"
Друкує Lutetium.
32. Фортран - забороняє q
q=0;print'("Thallium")';end
Друкує Thallium.
33. Паскаль - забороняє l
begin;var l:integer;write(#70#114#97#110#99#105#117#109)end.
Друкує Francium.
34. PHP - забороняє k
<?=$k="\70\108\117\111\114\105\110\101";
Друкує Fluorine.
35. Хаскелл - забороняє S
main=putStr"Sodium"
Друкує Sodium.
36. С ++ - забороняє ~
#include<cstdio>
main(){~puts("\x41ctinium");}
Друкує Actinium.
37. ObjC - забороняє j
main(j){puts("Hydrogen");}
Друкує Hydrogen.
38. Луа - забороняє g
print("\65statine")
Друкує Astatine.
39. JavaScript - забороняє b
alert("\x43h\x6corine")
Сповіщення Chlorine .
40. Баш - забороняє h
echo Osmium
Друкує Osmium.
41. Сиан - забороняє o
say"Hassium"
o=0
Друкує Hassium.
42. J - забороняє d
wd'Titanium'
Друкує Titanium.
43. Схема - забороняє x
(let((x 0))(print"Vana\x64ium"))
Друкує Vanadium.
44. С - забороняє {
main(){puts("\x55ranium");}
Друкує Uranium.
45. ФОРТ - забороняє m
84 emit
104 emit
111 emit
114 emit
105 emit
117 emit
109 emit
Друкує Thorium.
46. ОСНОВНІ - забороняє T
T$="Tin"
?T$
Друкує Tin.
47. Перл 6 - забороняє y
say "\o124\o145\o162\o142\o151\o165\o155"
Друкує Terbium.
48. Asdf - забороняєa
asaasaasssasaasssassaasaasssaasaasssaasaasssaasaasssaasaasssasaasssassaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassaasaasssaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassasaasssassaasaasssasaasssassasaasssassaasaasssaasaasssasaasssassaasaasssasaasssassaasaasssasaasssassasaasssassaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassasaasssassaasaasssasaasssassaasaasssaasaasssasaasssassaasaasssasaasssassasaasssassaasaasssaasaasssaasaasssasaasssassasaasssass
Друкує Arsenic. Генерування сценарію .
49. Tcl - забороняє s
puts "\123\151\154\151\143\157\156"
Друкує Silicon.
50. Перл - забороняє ;
print"\122\150\157\144\151\165\155";
Друкує Rhodium.
51. Пітон - забороняє r
print"\103\150\162\157\155\151\165\155"
Друкує Chromium.
52. ВАРП - забороняє=
=nn0(82(104(110(105(117(109
Друкує Rhenium.
53. ETA - забороняєn
nnOtOe nHHOne enenteht O
nnHHHe nHHtOe enenteht O
nntOHe nHHtne enenteht O
nnHnHe nHHtne enenteht O
nntnte nHHtne enenteht O
nHOHne nHHHte enenteht O
Друкує Bromine.
54. Аксо - забороняє\
99*3+(94+8*('u'(93+9*(35*7*('fu'(7+(\
Друкує Thulium.
55. Рубі - забороняє t
putc 69
putc 117
putc 114
putc 111
putc 112
putc 105
putc 117
putc 109
Друкує Europium.
56. DBFV! - забороняєu
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u6 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u6 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u3 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u8 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u6 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 u>
u<9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u9 *u6 *u4 u>
Друкує Niobium . Кожен пробіл - це фактично новий рядок.
57. Миша - забороняє'
77 !' 101 !' 114 !' 99 !' 117 !' 114 !' 121 !'
Друкує Mercury.
58. Слово - забороняєf
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
Друкує Cadmium.
59. Ftack - забороняє$
H 109 117 105 104 116 105 $ 1 76
Друкує Lithium.
60. ВАСД - забороняєe
Ми вводимо концепцію тривіального рішення Brainfuck (TBS): ми можемо надрукувати будь-який символ у 257 командах Brainfuck, збільшивши акумулятор c разів, вивівши, потім збільшивши його (256 c ) більше разів, щоб скинути його. Повторення цього символу для кожного символу в рядку дає рішення. Всякий раз , коли у нас є два підпрограм iі oця функція так само , як Brainfuck - х +і ., ми називаємо переведений TBS в ( i,o ) -TBS.
Замість того, щоб загортатись, ми можемо встановити акумулятор на нуль після друку за допомогою деякої підпрограми o'. Це ( i,o' ) -zeroing TBS.
Крім того, у нас може бути не обгортання, а підпрограма, dяка зменшує акумулятор. Це ( i, o,d ) -TBS.
Для WASD друкується ( w, e) -TBSSilver .
61. УРСЛ - забороняєw
А ( i1, w1, c1) -TBS відбиткиKrypton .
#73#114#105#100#105#117#109
Друкує Iridium.
63. Сова - забороняє?
0[]?83)117)108)102)117)114)
Друкує Sulfur.
64. РУБЕ - забороняє)
+ + + +
8478 666 667 6965767 6 )
cccccccccccccccccccccccc
........................
O
c
.
Друкує Holmium.
Друкує A ( (, ") -TBSBohrium .
66. ФАЛЬС - забороняє[
[]!71,97,108,105,117,109,
Друкує Gallium.
,-,++66,-,+8,+5,+*55,*8958
Друкує Hafnium.
68. Кіпл - забороняє>
70>o 101>o 114>o 109>o 105>o 117>o 109>o
Друкує Fermium.
68]117]98]110]105]117]109]""^
Друкує Dubnium.
67"P.97"P.108"P.99"P.105"P.117"P.109"P.
Друкує Calcium.
71. OOo КОД - забороняєp
Друкує A ( PpP, PPp) -TBSBismuth .
72. дк - забороняєP
67P97P100P109P105P117P109P
Друкує Cadmium.
82O97O100O105O117O109O
Друкує Radium.
TODO
Друкує Cobalt.
75. Врейвакс - забороняє<
TODO
Друкує Cerium.
76. Фуе - забороняєH
80 111 108 111 110 105 117 109 H
Друкує Polonium.
77. Пі - забороняє6
Перейдіть bf2piіз статті вікі про тривіальне рішення Brainfuck для друкуXenon .
78. CJam - забороняє5
A ( 1+, c 0) -zeroing TBS (з попередньою 0) друкуєNickel .
79. Wordfuck - забороняє9
Друкує A ( 9999, 99) -TBSCarbon .
80. Ленгуаг - забороняє7
≈ 3^(257*4*3) sevens
Див. 91-94 (лише для використання 7)Radon .
TODO
Друкує Barium.
82. CaneCode - забороняє8
Друкує A ( 1, 8) -TBSIodine .
A ( 2, 3) -TBS друкує Indium, але2 зменшення замість збільшення, тому віднімайте кожен код символів від 256 спочатку.
84. ferNANDo - забороняє2
1 1 1
2 1 2 2 2 2 2 1
2 1 1 1 2 2 1 2
2 1 1 2 2 1 1 1
2 1 1 2 1 1 1 1
2 1 1 2 1 1 1 2
Друкує Argon.
Попередньо 0до ( 1+, ,0) -zeroing TBS і додаючи @, друкуєHelium .
86. Вир - забороняє1
Передчуваючи One Load Zeroна ( Add, AscIO Zero) -zeroing відбитки TBS Boron.
Друкує A ( -, ,) -TBSErbium .
Друкує A ( +, .) -TBSCurium .
Друкує ( i, c) -TBSCopper .
90. Йота - забороняєi
Ми обчислюємо розшифровку базисних чисел-256 на 256, Zincщоб компенсувати відсутність Іоти в Іоті. Визначте
succ = ***i*i*i*ii***i*i*i*ii**i*i*ii*i*i*i*ii*i*i*ii
Тоді рішення - це 1516858978 повторень з succнаступними*ii , загальною довжиною 69775512991 байт.
Унарні програми
Наступні чотири рішення (і 70) схожі: всі вони складаються з приблизно 3 ^ (257 * 4 * 3) повторень персонажа, який вони забороняють (за винятком Еліпсіса тричі довше). Точне значення визначається шляхом перетворення TBS в вісімку, як описано у вікі.
91. Еліпсис - забороняє.
≈ 3^(257*4*3+1) periods
Друкує Neon.
92. Екстатик - забороняє!
≈ 3^(257*4*3) exclamation marks
Друкує Lead.
93. MGIFOS - забороняє*
≈ 3^(257*4*3) asterisks
Друкує Iron.
94. Унар - забороняє0
≈ 3^(257*4*3) zeros
Друкує Gold.
95. Пробіл - забороняє простір
Програма Whitespace, створена цим сценарієм Python:
import sys
for c in 'Oxygen':
print ' ' + ''.join(' \t'[int(b)] for b in bin(ord(c))[2:])
sys.stdout.write('\t\n ')
print '\n\n'
відбитки Oxygen.