Сумма элементов матрицы Опции

[ser2live]

Нужно вычислить сумму элементов матрицы

Для начала НУЖНО читать правила... DOC удален...

Сообщение отредактировано: volvo - 4.03.2007 15:03

[Артемий]

А так?

i:=0;
for p:= 1 to n do begin
 for o:= 1 to n do begin
  i:=i+arr[p,o];
 end;
end;
writeln(i);

n - количество элементов матрицы.