Zum Inhalt springen
Aufgabe: https://twitter.com/shahlock/status/850294052767531008 Mathematische Anmerkung: Kryptogramme mit Wurzeln sind ein "Leckerbissen", eine Delikatesse. Üblicherweise herrscht die Addition vor. Code: zahl1:[N,O,N,R,A,N,D,O,M]$ zahl2:[D,E,I,T,Y]$ f9:[10^8,10^7,10^6,10^5,10^4,10^3,10^2,10^1,10^0]$ f5:[10^4,10^3,10^2,10^1,10^0]$ gleichung:sqrt(zahl1.f9)=zahl2.f5$ ziffern:setify(makelist(i,i,0,9))$ zaehler:0$ disp(["#",zahl1,zahl2])$ for N in setdifference(ziffern,{0})…
Aufgabe: https://twitter.com/shahlock/status/849988257907712002 Code: zahl1:[C,O,M,P,U,T,E,R]$ zahl2:[B,O,O,T]$ f8:[10^7,10^6,10^5,10^4,10^3,10^2,10^1,10^0]$ f4:[10^3,10^2,10^1,10^0]$ gleichung:sqrt(zahl1.f8)=zahl2.f4$ ziffern:setify(makelist(i,i,0,9))$ zaehler:0$ disp(["#",zahl1,zahl2])$ for C in setdifference(ziffern,{0}) do \ for O in setdifference(ziffern,{C}) do \ for M in setdifference(ziffern,{C,O}) do \ for…
Aufgabe: https://twitter.com/shahlock/status/843802091818770432 Code 01: f(x):=makelist(10^(x-i),i,1,x); zahl1:[s,p,r,i,n,g]; zahl2:zahl1; zahl3:[a,l,l,e,r,g,y]; gleichung:zahl1.f(6)+zahl2.f(6)=zahl3.f(7); buchstaben:setify(flatten([zahl1,zahl2,zahl3])); Code 02: ziffern:setify(makelist(i,i,0,9))$ disp(" {a,e,g,i,l,n,p,r,s,y}")$ for a in setdifference(ziffern,{0}) do \ for e in setdifference(ziffern,{a}) do \ for g in…
Aufgabe: https://twitter.com/shahlock/status/843105753925914625 Informationen zu HAIKU: https://de.wikipedia.org/wiki/Haiku Code: zaehler:0$ Ziffern:{0,1,2,3,4,5,6,7,8,9}$ print("# [a, e, f, h, i, k, n, s, u, v]")$ for a in Ziffern do for e in setdifference(Ziffern,{a}) do for…
Aufgabe: Was auf Überprüfung wartet. Die Rechenzeit wird wohl heftig sein, wenn man alle Lösungen will. https://twitter.com/shahlock/status/839860057256902656 Wie man die Gleichung bekommt. Code: Funktionen1:[SIN,COS,TAN,CSC,SEC,COT]$ Funktionen2:map(string,Funktionen1)$ f(x):=charlist(string(x))$ Funktionen3:map(f,Funktionen1)$ Funktionen4:makelist(map(parse_string,Funktionen3[i]),i,1,6)$ F1:[100,10,1]$ F2:[1000,100,10,1]$…