Даны два числа n и m. Создайте двумерный массив A[n][m], заполните его таблицей умножения A[i][j]=i*j и выведите на экран. При этом нельзя использовать вложенные циклы, все заполнение массива должно производиться одним циклом.
Входные данные
Программа получает на вход два числа n и m – количество строк и столбцов, соответственно.

Выходные данные
Программа должна вывести полученный массив. Числа разделяйте одним пробелом.

//Пришло время писать низкокачественный код//Низкокачественный код сам себя не напишет!//Pascal ABC.NET Версия 2.2 Сборка 790var ar:array of array of integer;m,n,i,k,j:integer;begin;j:=1;readln(n);readln(m);setlength(ar,n+1);for i:=1 to n dosetlength(ar[i],m+1);writeln('Matrix:');for i:=1 to m*n dobegin;inc(k);ar[j,k]:=j*k;write(ar[j,k],' ');if k=m thenbegin;k:=0;inc(j);writeln;end;end;end.Пример ввода:38Пример вывода:Matrix:1 2 3 4 5 6 7 82 4 6 8 10 12 14 16 3 6 9 12 15 18 21 24