write(a[ i, j ]);
writeln;{ця процедура потрібна для порядкового виведення матриці}
end;
Приклад. Дано матрицю дійсних чисел А.
А(3,5)=
Одержати матрицю В, значення якої дорівнюють подвоєним значенням матриці А.
constn=3;{кількість рядків}
m=5;{кількість стовпців}
typemassiv = array[1..n,1..n] ofreal;
