Quelle: https://twitter.com/HansruediWidmer/status/1340178801406300160?s=20
Maxima Code
zahl:84516387853;
ziffern:string(zahl);
liste:charlist(ziffern);
m:length(liste);
for i:1 thru m do begin(
print(liste),
n:length(liste),
liste:lastn(liste,n-1)
)$
Man erhält lauter Primzahlen.
wxMaxima:
