Матрицы
Задана вещественная квадратная матрица A = { a(ij) }, i, j = 1/n . Соста-вить программу вычисления суммы элементов матрицы A, располо-женных в строках с отрицательным элементом на главной диагонали.
Код:
sum:=0;
for i:=1 to n do
if a[i,i]<0 then
for j:=1 to n do
sum:=sum+a[i,j];
for i:=1 to n do
if a[i,i]<0 then
for j:=1 to n do
sum:=sum+a[i,j];