Program P4;
 { Eroare de depăşire semnalată în procesul compilării }
var x : integer;
begin
 x:=MaxInt+1; { Eroare, x>MaxInt }
 writeln(x);
end.