{ This is a comment. }
(* This is also a comment. *)
program five(input, output);
var
  i: integer;
procedure munge(var x: integer; var y: integer);
begin
        x := 5;
        y := 6;
        writeln(x);
end;

begin
  munge(i,i);
end.