PROGRAM program_name
          VAR %% beginning of variable declarations, required even no var's
          x, y, z: INTEGER;
          ENDVAR
       BEGIN
          READ(1y);
          x := (_y + 3 * 4) - 5
            BEGIN
		VAR %% beginning of variable declarations, required even no var's
          	x, x, z: INTEGER;
          	ENDVAR
                x := 2;
		2 := y;
                WRITE(x);
                WRITESP();
                WRITE(y);
                WRITELN();
            END
          WRITE(y);
          WRITESP();
          WRITE(x);
          WRITELN();
       END