79

Помогите! Нужно вычислить сумму элементов главной диагонали и элементов выше…

08 апреля 2023

Помогите! Нужно вычислить сумму элементов главной диагонали и элементов выше главной диагонали ("верхний треугольник") двумерного массива [1… 3,1… 3]только, пожалуйста, попроще, с циклом for

категория: информатика



66

На паскале АБЦconst n=3; var m: array[1… n,1… n] of real; s1,s2: real; i,j: integer; beginfor j: =1 to n dofor i: =1 to n do read (m[i,j]); s1: =0; for i: =1 to n do s1: =s1+m[i,i]; s2: =0; for j: =1 to n dofor i: =j+1 to n do s2: =s2+m[i,j]; writeln (s1,',s2) end.

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


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...