Урок 13.1 Задача 8

Урок 13.1 Задача 8

Выведете на экран числа от 1 до 5 два раза с помощью вложенных циклов. Так чтобы в консоли было:

	
1 2 3 4 5
1 2 3 4 5

Решение:

program u13z08;
var i,j: integer;
begin
  for i:=1 to 2 do
  begin
    for j:=1 to 5 do
      write(j, ' ');
    writeln();
  end;
  readln();
end.

Консоль:

1 2 3 4 5
1 2 3 4 5