Einen hab ich noch: Kein Vergleich, keine 0, nur simples Addieren. Alle Zwischenergebnisse innerhalb des Wertebereiches.
Delphi-Quellcode:
Var
x : Double;
i : Integer;
begin
x:=-1;
For i:=1 to 10000 do x := x + 0.1;
For i:=1 to 10000 do x := x - 0.1;
memo.lines.add (FloatToStr(x));
end;
Was kommt raus (x + 10000*0.1 - 10000*0.1 = ?)
Bei Extended muss man ca. 500x öfter rechnen. Kann es sein, das auch die 0.1 nicht 100%ig akkurat dargestellt werden kann?