Паскаль как вывести
1 2 3 4 5 6 7 8 9 10
11 12 13 14 15 16 17 18 19 20
Паскаль как вывести
1 2 3 4 5 6 7 8 9 10
11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10
11 12 13 14 15 16 17 18 19 20
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Program print;
Var n:integer;
begin
n:=1;
while (n <= 20) do begin
write(n, ' ');
if (n mod 10 = 0) then writeln;
n:=n+1;
end;
readln;
end.