Ach Leute, einfach mit Double oder Extended rechnen (wobei Double eigentlich immer reicht). Dann das Ergebnis auf die gewünschte Genauigkeit runden, und zwar mit 'RoundTo'.
Bei den Float-Datentypen einfach immer im Hinterkopf haben, das man nicht auf Gleichheit prüfen kann. Um eine Zahl mit einer anderen auf Gleichheit zu prüfen, bildet man die Differenz und prüft, ob das Ergebnis < irgendein Grenzwert ist. Die Math-
Unit stellt dafür einige Funktionen bereit: 'IsZero', 'SameValue' und 'CompareValue'.