{ %OPT=-vh -Seh }

procedure t;
var
  i: integer = 5;
  defaulti: integer;
begin
  writeln(i);
end;

begin
  t;
end.