;----------------------------------------

; local variable definition task 1

;----------------------------------------

FLOAT pippo, pluto

FLOAT support

; example of forcing type "CAST"

FLOAT f1, f2, f3, f4

...

r(100) = 1000000000 ; 1e9

r(102) = 5

r(103) = 128

r(104) = 5

...

; multiplication takes place between integers.... so with the above data we get out of the validity range of the INT

; 5 * 1e9 = 1000000000 -> 0x12A05F200, which is truncated to 0x2A05F200 -> 705032704

f1 = r(100) * r(101) ; f1 = 7.050327e+8

; the multiplication is between integers but the cast (FLOAT) forces the conversion from INT to FLOAT before performing the multiplication.

f2 = (FLOAT)r(100) * r(101) ; f2 = 5e+9

if (R(103))

 ; division takes place between integers

 f3 = R(102) / r(103) ; f3 = 25

 ; data is converted to FLOAT before division is done

 f4 = (FLOAT)r(102) / r(103) ; f3 = 25.6

else

 f3 = 0

 f4 = 0

endif