6 lines
61 B
ObjectPascal
6 lines
61 B
ObjectPascal
begin
|
|
var i:=1;
|
|
i:=i+1;
|
|
var j:=i;
|
|
writeln(j);
|
|
end. |