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