Zahlendreiecke mit Delphi lösen?

[Elko]

Du weißt folgendes:
50=b+d
45=b+e
33=d+e

Dann löst du einfach nach einer Variablen auf:
b=50-d
e=45-b
d=33-e


Und dann setzt du einfach zB. in den dritten Term ein:
d=33-(45-(50-d))

...auflösen ergibt:
d=33-(45-50+d)
d=33-45+50-d
d=38-d
2d=38
d=19


Dann kannst du einfach in die oberen Terme einsetzen

Um das ganze in Delphi umzusetzen musst du natürlich anstatt die Zahlen dann den Inhalt der Edit-Felder einsetzen

Gruß,
Elko