PROGRAM program_name
   VAR 
   BEGIN
      READ(y);
      _x := (y + 3.0 * 4.0) - 5.0;
      WRITE(y);
      WRITESP();
      WRITE(x);
      WRITELN();
   END