Евгений
Евгений

найти сумму элементов матрицы? нужен код турбо паскаль



Пусть дана вещественная квадратная матрица порядка n. В строках с отри¬цательным элементом на главной диагонали найдите:
а) сумму элементов;

Ив
Иван

program one;
const n=10;
var i,j,sum: integer;
var matrica: array [1..n,1..n] of integer;

begin
for i:=1 to n
sum:=0;
if matrica[i,i] < 0 then begin for j:=1 to n sum:=sum+matrica[i,j]; writeln(sum); end;
end;
end.

Похожие вопросы
помогите с задачей о седловом элементе матрицы в паскале
найти сумму элементов матрицы?нужен код паскаля
Сумма элементов массива в паскаль.
Опять турбо паскаль)) Выдаёт ошибку в коде...
задана матрица А [10][15], найти количество и сумму элементов этой матрицы, значения задать можно рандомно. С++
помогите найти ошибку в коде турбо паскаль
Дан двумерный массив размера (матрица). Найти индексы всех максимальных элементов. (Паскаль)
дана матрица найти сумму минимальных элементов на каждой строке
Дана задача массив A(n). Требуется определить сумму всех положительных элементов. Турбо паскаль.
Помогите с кодом программы для Паскаля, матрица.