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

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

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

Решение:

var m, a: integer;
begin
  for m := 1 to 9 do;
    begin
      for a := 1 to 9 do;
        write (m, '/', a, '=',  m/a, ' ');
      writeln();
    end;
   readln();
end;