Найти сумму элементов массива, которые имеют непарные индексы - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Найти сумму элементов которые имеют непарные индексы.

Решение задачи: «Найти сумму элементов массива, которые имеют непарные индексы»

textual
Листинг программы
Summ:=0;
For i:=1 to MaxX
  For j:=1 to MaxY do
    If i<>j then Summ:=Summ+M[i,j];

Объяснение кода листинга программы

Summ := 0;
For i := 1 to MaxX
  For j := 1 to MaxY do
    If i <> j then Summ := Summ + M[i, j];

Оцени полезность:

9   голосов , оценка 4.444 из 5
Похожие ответы