[Oberon] real math

[oberon at moravcik.info]

Hi,

following code returns imprecise real number:

 r : REAL;

 r := 480 / 100 * 100;
 out.Int( ENTIER(r * 1000000) , 0 );

outputs 48000019 instead of 48000000

How to check that 480/100*100 is 480 again ?

Thanks
Zdenek