program foo(output);
  var
    x: integer;
begin
    x := x + 1;
end.