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