prog;

var f : 7;
var g : int

begin

  var c, a : int;
  var z, b : 5

  write f;
  write g;
  write a;
  write b;

  write f, g, a, b;

  g := b;
  a := f;

  write f, g, a, b;

end;
end prog