Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
Delphi 10 Seattle Enterprise
|
AW: ggT und KgV von 2 Zahlen berechnen - absolut keine Ahnung
20. Nov 2010, 20:06
Wenn man sich wundert, warum da irgendwas passiert, was man nicht erwartet, und man im Prinzip gar nicht versteht was da so passiert, dann hilft immer die Methode mit einem Ausdruck des Quelltextes, ein leeres Blatt Papier und evtl. für Notizen Block und Stift.
Versuchen wir mal das Beispiel mit dem Teilen.
Da wird etwas komisches ausgegeben, was man so gar nicht vermutet hat. Also machen wir das mal als Trockenübung
a := StrToFloat (Zahl1.Text);
Ok, merke ich mir (a ist 5)
b := StrToFloat (Zahl2.Text);
Ok, merke ich mir (b ist 0)
c:= a/b;
Öh, das kann ich ja gar nicht berechnen "Hallo, kann mir mal jemand helfen?"
Na, dann höre ich mal auf, denn hier stimmt was nicht!
Komischerweise kommt man zu dem gleichen Ergebnis wie das kompilierte Programm
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
|