Aufgabenstellung in Twitter:
Wir suchen ein Programm, welches nach der Eingabe einer natürlichen Hochzahl, die größer als 0 ist, diese Behauptung überprüft.
Berechnung eines Fallbeispieles mit Hochzahl 100

Code:
exponent:100 /* EINGABE */;
ziffer:charlist(string(275));
z:275^exponent;
l:charlist(string(z));
f(x):=member(x,l);
map(f,ziffer);
Probelauf mit Maxima Online:
http://maxima-online.org/?inc=r688909960