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