11 lines
150 B
Text
11 lines
150 B
Text
|
var i : Integer;
|
||
|
|
|
||
|
|
for i := 1 to 10 do begin
|
||
|
|
Print(i);
|
||
|
|
if i mod 5 = 0 then begin
|
||
|
|
PrintLn('');
|
||
|
|
continue;
|
||
|
|
end;
|
||
|
|
Print(', ');
|
||
|
|
end;
|