95 dil (tüm karakterler kullanılıyor!)
(YAPILACAKLAR: Planladığım ancak uygulamadığım birkaç cevap daha var)
1. COBOL - yasaklar A
PROGRAM-ID.g.PRODECURE DIVISION.DISPLAY"Ununtrium".
Baskılar Ununtrium
.
2. REBOL - yasaklar B
REBOL[]prin"Tellurium"
Baskılar Tellurium
.
3. m.ö. - yasaklar ^
a=0^0
"Strontium"
Baskılar Strontium
.
4. D - yasaklar D
void main(char[][]D){printf="Ruthenium";}
Baskılar Ruthenium
.
5. Java - yasaklar E
enum E{E;{System.out.print("\x41luminium");}}
Baskılar Aluminium
.
6. Scala - yasaklar F
val F=print("Plutonium")
Baskılar Plutonium
.
7. Pas - yasaklar G
fn main(){let G:u8;print("\x41mericium")}
Baskılar Americium
.
8. Nim - yasaklar &
discard 0&0
echo "Neptunium"
Baskılar Neptunium
.
9. C # - yasaklar C
class V{static void Main(){System.Console.Write("Neodymium");}}
Baskılar Neodymium
.
,1 1.%vv"Manganese"Q
Baskılar Manganese
.
11. Nemerle - yasaklar I
Nemerle.IO.print("Magnesium")
Baskılar Magnesium
.
12. Ada - yasaklar J
procedure gnat.io.J is begin put("Palladium");end;
Baskılar Palladium
.
13. Git - yasaklar |
package main
func main(){if 1|1>0{print("Germanium")}}
Baskılar Germanium
.
14. K - yasaklar ''
`0:"Ytterbium"
Baskılar Ytterbium
.
15. Erlang - yasaklar /
-module(test).
-export([m/0]).
m()->io:put_chars("\x42eryllium").
Baskılar Beryllium
.
16. Prolog - yasaklar :
m:-write('\102erkelium').
Baskılar Berkelium
.
17. Smalltalk - yasaklar K
K:=0.'Lanthanum'display
Baskılar Lanthanum
.
18. PARI / GP - yasaklar L
print(Potassium)
Baskılar Potassium
.
19. REXX - yasaklar M
M=0
say "Tungsten"
Baskılar Tungsten
.
20. LilyPond - yasaklar N
#(let((N 0))(print"\x46levorium"))
Baskılar Flevorium
.
21. Yay - yasaklar Q
(let Q 1(pr "\x41ntimony"))
Baskılar Antimony
.
22. Ortak LISP - yasaklar R
(let((R 0))(princ"Tantalum"))
Baskılar Tantalum
.
23. Clojure - yasaklar U
(def U)(pr'Selenium)
Baskılar Selenium
.
24. Logo - yasaklar Z
to Z
end
pr[Scandium]bye
Baskılar Scandium
.
25. Harika - yasaklar W
print"Samarium";W=0
Baskılar Samarium
.
26. Asimptot - yasaklar X
write('\x52ubidium');int X=0;
Baskılar Rubidium
.
27. Oktav - yasaklar Y
Y=0;disp Yttrium
Baskılar Yttrium
.
28. gnuplot - yasaklar V
V=0;prin"Vanadium
Baskılar Vanadium
.
29. Uçurtma - yasaklar z
z=0;"\x4eobelium"|print;
Baskılar Nobelium
.
30. Sincap - yasaklar _
print("\x4eitrogen");local _=0;
Baskılar Nitrogen
.
31. Köri - yasaklar v
v=v;main=putStr"\x4cutetium"
Baskılar Lutetium
.
32. Fortran - yasaklar q
q=0;print'("Thallium")';end
Baskılar Thallium
.
33. Pascal - yasaklar l
begin;var l:integer;write(#70#114#97#110#99#105#117#109)end.
Baskılar Francium
.
34. PHP - yasaklar k
<?=$k="\70\108\117\111\114\105\110\101";
Baskılar Fluorine
.
35. Haskell - yasaklar S
main=putStr"Sodium"
Baskılar Sodium
.
36. C ++ - yasaklar ~
#include<cstdio>
main(){~puts("\x41ctinium");}
Baskılar Actinium
.
37. ObjC - yasaklar j
main(j){puts("Hydrogen");}
Baskılar Hydrogen
.
38. Lua - yasaklar g
print("\65statine")
Baskılar Astatine
.
39. JavaScript - yasaklar b
alert("\x43h\x6corine")
Uyarılar Chlorine
.
40. Bash - yasaklar h
echo Osmium
Baskılar Osmium
.
41. Camgöbeği - yasaklar o
say"Hassium"
o=0
Baskılar Hassium
.
42. J - yasaklar d
wd'Titanium'
Baskılar Titanium
.
43. Şema - yasaklar x
(let((x 0))(print"Vana\x64ium"))
Baskılar Vanadium
.
44. C - yasaklar {
main(){puts("\x55ranium");}
Baskılar Uranium
.
45. FORTH - yasaklar m
84 emit
104 emit
111 emit
114 emit
105 emit
117 emit
109 emit
Baskılar Thorium
.
46. TEMEL - yasaklar T
T$="Tin"
?T$
Baskılar Tin
.
47. Perl 6 - yasaklar y
say "\o124\o145\o162\o142\o151\o165\o155"
Baskılar Terbium
.
48. Asdf - yasaklara
asaasaasssasaasssassaasaasssaasaasssaasaasssaasaasssaasaasssasaasssassaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassaasaasssaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassasaasssassaasaasssasaasssassasaasssassaasaasssaasaasssasaasssassaasaasssasaasssassaasaasssasaasssassasaasssassaasaasssasaasssassasaasssassasaasssassaasaasssaasaasssasaasssassasaasssassaasaasssasaasssassaasaasssaasaasssasaasssassaasaasssasaasssassasaasssassaasaasssaasaasssaasaasssasaasssassasaasssass
Baskılar Arsenic
. Komut dosyası oluşturuluyor .
49. Tcl - yasaklar s
puts "\123\151\154\151\143\157\156"
Baskılar Silicon
.
50. Perl - yasaklar ;
print"\122\150\157\144\151\165\155";
Baskılar Rhodium
.
51. Python - yasaklar r
print"\103\150\162\157\155\151\165\155"
Baskılar Chromium
.
52. WARP - yasaklar=
=nn0(82(104(110(105(117(109
Baskılar Rhenium
.
53. ETA - yasaklarn
nnOtOe nHHOne enenteht O
nnHHHe nHHtOe enenteht O
nntOHe nHHtne enenteht O
nnHnHe nHHtne enenteht O
nntnte nHHtne enenteht O
nHOHne nHHHte enenteht O
Baskılar Bromine
.
54. Axo - yasaklar\
99*3+(94+8*('u'(93+9*(35*7*('fu'(7+(\
Baskılar Thulium
.
55. Yakut - yasaklar t
putc 69
putc 117
putc 114
putc 111
putc 112
putc 105
putc 117
putc 109
Baskılar Europium
.
56. DBFV! - yasaklaru
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>
Baskılar Niobium
. Her alan aslında bir satırsonu.
57. Fare - yasaklar'
77 !' 101 !' 114 !' 99 !' 117 !' 114 !' 121 !'
Baskılar Mercury
.
58. Kelime - yasaklarf
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.
Baskılar Cadmium
.
59. Ftack - yasaklar$
H 109 117 105 104 116 105 $ 1 76
Baskılar Lithium
.
60. WASD - yasaklare
Önemsiz Brainfuck çözümü (TBS) kavramını tanıtıyoruz : 257 Brainfuck komutlarında herhangi bir karakteri, akümülatör c zamanlarını artırarak, çıktısını alarak, daha sonra sıfırlamak için (256- c ) daha fazla arttırarak yazdırabiliriz . Bu, dizedeki her karakter için tekrarlandığında çözüm sağlanır. İki alt programları yaşadığımızda i
ve o
tam olarak Brainfuck en gibi bu işlevi +
ve .
biz tercüme TBS (calli
,o
) -TBS .
Etrafına sarmak yerine, bir alt program kullanarak yazdırdıktan sonra akümülatörü sıfıra ayarlayabiliriz o'
. Bu ( i
,o'
) sıfırlayan TBS'dir.
Alternatif olarak, sargımız yok ama d
akümülatörü azaltan bir alt programımız olabilir . Bu bir ( i
,o
,d
) -TBS.
WASD a ( w
, e
) -TBS baskıları içinSilver
.
61. URSL - yasaklarw
A ( i1
, w1
, c1
) baskı -TBSKrypton
.
#73#114#105#100#105#117#109
Baskılar Iridium
.
63. Baykuş - yasaklar?
0[]?83)117)108)102)117)114)
Baskılar Sulfur
.
64. KAUÇUK - yasaklar)
+ + + +
8478 666 667 6965767 6 )
cccccccccccccccccccccccc
........................
O
c
.
Baskılar Holmium
.
A ( (
, "
) -TBS baskılarıBohrium
.
66. YANLIŞ - yasaklar[
[]!71,97,108,105,117,109,
Baskılar Gallium
.
,-,++66,-,+8,+5,+*55,*8958
Baskılar Hafnium
.
68. Kipple - yasaklar>
70>o 101>o 114>o 109>o 105>o 117>o 109>o
Baskılar Fermium
.
68]117]98]110]105]117]109]""^
Baskılar Dubnium
.
67"P.97"P.108"P.99"P.105"P.117"P.109"P.
Baskılar Calcium
.
A ( PpP
, PPp
) -TBS baskılarıBismuth
.
72. dc - yasaklarP
67P97P100P109P105P117P109P
Baskılar Cadmium
.
82O97O100O105O117O109O
Baskılar Radium
.
TODO
Baskılar Cobalt
.
75. Vrejvax - yasaklar<
TODO
Baskılar Cerium
.
76. Fueue - yasaklarH
80 111 108 111 110 105 117 109 H
Baskılar Polonium
.
77. Pi - yasaklar6
bf2pi
Yazdırmak için önemsiz bir Brainfuck çözümündeki wiki makalesinden çalıştırınXenon
.
78. CJam - yasaklar5
A ( 1+
, c 0
) sıfırlama TBS (önceden 0
eklenmiş) baskılar Nickel
.
A ( 9999
, 99
) -TBS yazdırırCarbon
.
80. Dil - yasaklar7
≈ 3^(257*4*3) sevens
91-94 (yalnızca Bkz 7
.) Baskı Radon
.
TODO
Baskılar Barium
.
A ( 1
, 8
) -TBS baskılarıIodine
.
A ( 2
, 3
) -TBS yazdırır Indium
, ancak2
artırılmak yerine azalır, bu nedenle her karakter kodunu önce 256'dan çıkarın.
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
Baskılar Argon
.
Prepending 0
bir (üzere 1+
, ,0
) TBS -zeroing ve ekleme @
, baskılarHelium
.
86. Girdap - yasaklar1
Prepending One Load Zero
bir (üzere Add
, AscIO Zero
) -zeroing TBS baskılar Boron
.
A ( -
, ,
) -TBS yazdırırErbium
.
A ( +
, .
) -TBS yazdırırCurium
.
Bir ( i
, c
) -TBS baskıCopper
.
90. Iota - yasaklari
Zinc
Iota'nın IO eksikliğini telafi etmek için bir kilise-sayısal tabanı-256-kod çözme hesaplıyoruz . Tanımlamak
succ = ***i*i*i*ii***i*i*i*ii**i*i*ii*i*i*i*ii*i*i*ii
Daha sonra çözelti, 1516858978 tekrarlama olduğunu succ
, ardından*ii
69775512991 bayt toplam uzunluğu için.
Tekli benzeri programlar
Aşağıdaki dört çözüm (ve 70) benzerdir: hepsi yasakladıkları karakterin yaklaşık 3 ^ (257 * 4 * 3) tekrarından oluşur (Elipsis üç kat daha uzun olduğu sürece). Kesin değere, TBS'yi wiki'de açıklandığı gibi sekizlik biçime dönüştürerek karar verilir.
≈ 3^(257*4*3+1) periods
Baskılar Neon
.
≈ 3^(257*4*3) exclamation marks
Baskılar Lead
.
93. MGIFOS - yasaklar*
≈ 3^(257*4*3) asterisks
Baskılar Iron
.
94. Tekli - yasaklar0
≈ 3^(257*4*3) zeros
Baskılar Gold
.
95. Boşluk - alanı yasaklar
Bu Python betiği tarafından oluşturulan Whitespace programı:
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'
yazdırır Oxygen
.