7 lines
95 B
ObjectPascal
7 lines
95 B
ObjectPascal
var i: integer;
|
|
|
|
begin
|
|
writeln(integer(pointer(@i)));
|
|
writeln(integer(@i));
|
|
readln;
|
|
end. |