var 
  a: array [1..10] of integer;
  i:=0;
begin

  i:=a[-1];
end.