Определить сумму всех элементов массива, расположенных над

главной диагональю

Question

Информатика

Эрнест

16 апреля, 02:42

Определить сумму всех элементов массива, расположенных над

главной диагональю

+1

Ответы (1)

Знаешь ответ?

Еленя · Answer 1

Const

n=3;

var a:array[1 ... n, 1 ... n] of integer;

i, j, s:integer;

begin

s:=0;

writeln ('Введите элементы матрицы');

for i:=1 to n do

for j:=1 to n do begin

read (a[i, j]);

if i
end;

writeln;

for i:=1 to n do begin

for j:=1 to n do write (a[i, j], ' ');

writeln;

end;

writeln ('Сумма всех элементов над главной диагональю = ', s);

end.

Определить сумму всех элементов массива, расположенных надглавной диагональю

Определить сумму всех элементов массива, расположенных над

главной диагональю