Просуммировать элементы квадратной матрицы…

Question

Просуммировать элементы квадратной матрицы, расположенные в верхней четверти, ограниченной главной и побочной диагоналями, включая элементы, расположенные на диагоналях. Помогите пожалуйста. Если не трудно

Answer 1

95

nekis2007

15 марта 2023

var a: array [1… 100,1… 100]of integer; n,i,j, Summ: integer; beginwrite ('n='); readln (n); for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random (99); write (a[i,j]: 4); end; writeln; end; Summ: =0; for i: =1 to (n div 2+n mod 2) do for j: =i to n — i+1 do Summ: =Summ+a[i,j]; writeln ('Summ=', Summ); readln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: