var a : integer;
begin
a := Inc(a);
end.