7 lines
119 B
ObjectPascal
7 lines
119 B
ObjectPascal
begin
|
|
if nil is object(var o) then else
|
|
begin
|
|
var i{@var i: integer;@} := 0;
|
|
writeln(o{@@});
|
|
end;
|
|
end. |