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

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

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

var a, b :integer;

var a, b : integer;

begin
  for a := 1 to 2 do
  begin
    for b := 1 to 5 do
      write(b, ' ');
    writeln();
  end;
  readln();
end.