два раза с помощью вложенных циклов

Решение задачи №8 из главы 13.1

Решение задачи №8 из главы 13.1

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

var a, b: integer;
begin
  for a := 1 to 5 do // цикл по строкам
   write(a,' ');
   begin
     writeln(); // переносим строку
     for b := 1 to 5 do // цикл по строкам
       write(b,' ');
   end;
   readln();
end.     
Subscribe to RSS - два раза с помощью вложенных циклов