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