По строковое и по столбовое сложение элементов в матрице
Напишите пожалуйста как это выглядит в паскале
sum:=0;
for i:=1 to n do
for j:=1 to m do
sum:=sum+Matrix[i,j];
writeln('summa elemenov ravna ', sum);
sum:=0;
for j:=1 to m do
for i:=1 to n do
sum:=sum+Matrix[i,j];
writeln('summa elemenov ravna ', sum);