PROGRAM main BEGIN VAR %% can be empty or completely missing x : INTEGER; y : FLOAT; z : FLOAT; ENDVAR y := 3.5; z := 0.0; WRITE(y); WRITESP(); y := y + 5.5; y := (y * 5.0)/5.0; WRITE(y); WRITESP(); y <-> z; WRITE(y); WRITESP(); x := (5 + 3*(1+2)); WRITE(z); WRITELN(); END