17 lines
129 B
ObjectPascal
17 lines
129 B
ObjectPascal
|
|
var
|
|
i:integer;
|
|
|
|
begin
|
|
|
|
i:=1+1;
|
|
writeln(i);
|
|
i:=i+1;
|
|
writeln(i);
|
|
i:=1+i;
|
|
writeln(i);
|
|
writeln(1+1);
|
|
System.Console.Readline;
|
|
|
|
end.
|