На вход подаются два целых положительных числа M и N (каждое число вводится с новой строки). Сформировать и вывести двумерный целочисленный массив размера M × N, у которого все элементы I-й строки имеют значение 10·I (I = 1, …, M). Каждую строку элементов массива выводить на новой экранной строке, для каждого числа отводить 6 экранных позиций.
uses PT4Exam;
const
R = 100;
S = 100;
var
a:array[1..R,1..S] of integer;
m,n,i,j:integer;
begin
Task('ExamBegin24');
Read(m, n);
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=i*10;
Write(a[i,j]:6);
end;
Writeln;
end;
end.