Registriert seit: 30. Nov 2005
Ort: München
5.771 Beiträge
Delphi 10.4 Sydney
|
Re: Probleme beim GGT / Kürzen von Brüchen / Ausgabe
31. Jan 2007, 13:15
if (q1 = q2) and (erg1 / ggt = r1 div z1) and (erg2 / ggt = r2 div z1) then
Nun, wenn Du erg1 / ggt teilst kommt da ein Floatwer heraus.
r1 div z1 liefert Dir einen Integerwert. Ein Floatwert hat (da wir uns in der digitalen Welt bewegen)
nicht zwingend ein 100% genaues Ergebnis. Hier solltest Du abprüfen ob erg1 / ggt
in einem bestimmten kleinen Bereich liegen.
Grüße
Klaus
Klaus
|