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

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

1 2 3 4 5
1 2 3 4 5

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