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