Gleitkommazahlen nach IEEE 754-1985 II

FPDemo.om

MODULE FPDemo; IMPORT Write; VAR x: REAL; i: INTEGER; BEGIN x := 0; i := 0; WHILE i < 10 DO x := x + 0.1; INC(i); END; IF x = 1.0 THEN Write.Line("Exaktes Resultat!"); ELSE Write.String("Ungenauigkeit: "); Write.Real(x - 1.0, 1); Write.Ln; END; END FPDemo.

Nicht nur irrationale Zahlen können nicht präzise dargestellt werden, sondern auch viele rationale Zahlen.
Beispiel: Für 0,1 (Dezimaldarstellung) gibt es keine exakte Darstellung.

doolin$ FPDemo Ungenauigkeit: -1.110223D-0016 doolin$