Дана вещественная квадратная матрица А, размерностью n*n. Найти сумму элементов матрицы, расположенных под главной диагональю

Дана вещественная квадратная матрица А, размерностью n*n. Найти сумму элементов матрицы, расположенных под главной диагональю
Гость
Ответ(ы) на вопрос:
Гость
program gt; var n,i,j:integer; a:array[1..100,1..100]of real; s:real; begin readln(n); for i:=1 to n do for j:=1 to n do begin read(a[i,j]); if(i=j)then s:=s+a[i,j]; end; writeln(s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы