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

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

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

1 2 3 4 5
1 2 3 4 5

var i, c :integer;
begin
for i := 0 to (1) do
  begin
    for c := 1 to (5) do
      write(c, ' ');
    writeln();
  end;
end.