# Ziffernsumme

***************************************
Dokumentnummer: D1001
Quelle http://www.edhelper.com
***************************************
Anmerkung: die Ziffernsumme muss 18 sein, damit es funktioniert. Wenn
man nur das Ergebnis anschaut, scheinen auch andere Ziffernsummen zu
funktionieren.

EINGABE

ziffernsumme:read("Gib die Ziffernsumme der dreistelligen Zahl ein");

VERARBEITUNG

g1:h+z+e=ziffernsumme;

g2:h-6=2*z;

g3:e-6=3*z;

l:solve([g1,g2,g3],[h,z,e]);

h:ev(h,l[1][1]);

z:ev(z,l[1][2]);

e:ev(e,l[1][3]);

zahl:100*h+10*z+e;

AUSGABE

print("Die gesuchte Zahl ist",zahl)$