Ich hab das ganze mal getestet:
Delphi-Quellcode:
with memo1.lines do
begin
add(floattostr(radtodeg(arccos(-1))));
add(floattostr(radtodeg(arccos(-0.75))));
add(floattostr(radtodeg(arccos(0))));
add(floattostr(radtodeg(arccos(0.75))));
add(floattostr(radtodeg(arccos(1))));
add(floattostr(radtodeg(arccos(1.0001))));
end;
Alle Befehle haben ein korrektes Ergebnis gebracht, der letzte Befehl (quod erat exspectandum) eine
Exception (Ungültige Gleitkommaoperation).