Заполнить матрицу из 3 строк и 4 столбцов случайными числами и вывести ее на экран. Найти сумму элементов матрицы
Вот пример который указывался в задании
program qq;
const N=3; M=4;
var A: array[1..N,1..M] of integer;
i,j,s: integer;
begin
{заполнение матрицы и вывод на экран}
s:=0;
for i:=1 to N do
for j:=1 to M do
s:=s+A[i,j];
writeln ('Сумма элементов матрицы', s);
end.