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

Задача 15 Урок 13.1:

С помощью вложенных циклов выведите на экран таблицу деления чисел от 1 до 9.

program task15;
var i, j: integer;
begin
  i := 1;
  repeat
    j := 1;
    repeat
      writeln(j, '/', i, '=', j/i, ' ');
      j:=j+1;
    until (j>=9);
    i:=i+1;
  until (i > 9);
  readln();
end.