Program P121;
 { Eroare }
var i, j : ^integer;
begin
 new(i);
 i^:=1;
 dispose(i);
 new(j);
 j^:=2;
 dispose(j);
 writeln('i^=', i^, '  j^=', j^);
 readln;
end.