Aufgabe:
Man berechne die Summe der dreistelligen Zahlen, die die Ziffern 1,2 und 3 enthalten.
Code:
G:{1,2,3};
P:permutations(G);
p:cardinality(P);
V:[100,10,1];
P:listify(P);
Z:makelist(P[i].V,i,1,p);
S:sum(Z[i],i,1,p);
Antwort:
Wenn man das Programm ausführt, ergibt sich die Summe 1332.
Maxima Online: http://maxima-online.org/?inc=r-1768200816