6 lines
99 B
ObjectPascal
6 lines
99 B
ObjectPascal
|
begin
|
|||
|
|
for var i:=1 to 10 do
|
|||
|
|
writeln(i);
|
|||
|
|
for i:integer := 1 to 10 do
|
|||
|
|
writeln(i);
|
|||
|
|
end.
|