95 языков (используются все символы!)
(TODO: еще пара ответов, которые я запланировал, но не реализовал)
1. Кобол - запрещает A
PROGRAM-ID.g.PRODECURE DIVISION.DISPLAY"Ununtrium".
Печать Ununtrium
.
2. REBOL - запрещает B
REBOL[]prin"Tellurium"
Печать Tellurium
.
3. до н.э. - запрещает ^
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. Smalltalk - запрещает 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. Groovy - запрещает 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. C ++ - запрещает ~
#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. Cyan - запрещает 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. FORTH - запрещает m
84 emit
104 emit
111 emit
114 emit
105 emit
117 emit
109 emit
Печать Thorium
.
46. бейсик - запрещает T
T$="Tin"
?T$
Печать Tin
.
47. Perl 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. Perl - запрещает ;
print"\122\150\157\144\151\165\155";
Печать Rhodium
.
51. Python - запрещает r
print"\103\150\162\157\155\151\165\155"
Печать Chromium
.
52. WARP - запрещает=
=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. Фтак - запрещает$
H 109 117 105 104 116 105 $ 1 76
Печать Lithium
.
60. WASD - запрещаетe
Мы вводим концепцию тривиального решения Брейнфука (TBS): мы можем напечатать любой символ в 257 командах Брейнфука, увеличив значение аккумулятора c раз, выдав, затем увеличивая его (256- c ) больше, чтобы сбросить его. Повторение этого для каждого символа в строке дает решение. Всякий раз, когда у нас есть две подпрограммы, i
и они o
функционируют точно так же, как +
и Брейнфак .
, мы называем переведенный TBS ( i
, o
) -TBS.
Вместо того, чтобы оборачиваться, мы могли бы установить аккумулятор на ноль после печати с использованием некоторой подпрограммы o'
. Это ( i
, o'
) нулевой TBS.
В качестве альтернативы, у нас может не быть обертки, а есть подпрограмма, d
которая уменьшает значение аккумулятора. Это ( i
, o
, d
) -TBS.
Для WASD ( w
, e
) -TBS печатает Silver
.
61. URSL - запрещает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 ( (
, "
) -TBS печатает Bohrium
.
66. ЛОЖЬ - запрещает[
[]!71,97,108,105,117,109,
Печать Gallium
.
67. Беттерав - запрещает-
,-,++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 CODE - запрещаетp
A ( PpP
, PPp
) -TBS печатает Bismuth
.
72. DC - запрещаетP
67P97P100P109P105P117P109P
Печать Cadmium
.
82O97O100O105O117O109O
Печать Radium
.
TODO
Печать Cobalt
.
75. Врейвакс - запрещает<
TODO
Печать Cerium
.
76. Fueue - запрещаетH
80 111 108 111 110 105 117 109 H
Печать Polonium
.
77. Пи - запрещает6
Бегать bf2pi
из вики статью о тривиальном решении Brainfuck для печати Xenon
.
78. CJam - запрещает5
A ( 1+
, c 0
) -обнуляющий TBS (с0
добавленными) отпечатками Nickel
.
79. Wordfuck - запрещает9
A ( 9999
, 99
) -TBS печатаетCarbon
.
80. Ленгуаг - запрещает7
≈ 3^(257*4*3) sevens
См. 91-94 (используйте только 7
.) ПечатьRadon
.
TODO
Печать Barium
.
82. CaneCode - запрещает8
A ( 1
, 8
) -TBS печатаетIodine
.
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
) обнуляющий TBS и добавляющий @
, печатает Helium
.
86. Вихрь - запрещает1
Подготовка One Load Zero
к ( Add
, AscIO Zero
) обнулению отпечатков TBSBoron
.
A ( -
, ,
) -TBS печатаетErbium
.
A ( +
, .
) -TBS печатаетCurium
.
( i
, c
) -TBS печатаетCopper
.
90. Йота - запрещаетi
Мы вычисляем декодирование церковно-цифровой базы-256, чтобы Zinc
восполнить отсутствие у Йоты IO. определять
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) повторений символа, который они запрещают (за исключением того, что Ellipsis является трижды длинным). Точное значение определяется путем преобразования TBS в восьмеричное, как описано в вики.
≈ 3^(257*4*3+1) periods
Печать Neon
.
≈ 3^(257*4*3) exclamation marks
Печать Lead
.
93. МГИФОС - запрещает*
≈ 3^(257*4*3) asterisks
Печать Iron
.
≈ 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
.