Вычислить произведение элементов с четными номерами. Pascal

Question

Вычислить произведение элементов с четными номерами. Pascal

Answer 1

For i:= 1 to n do
if (mas[i] mod 2 = 0)
sum := mas[i] * sum;

Comments

for i:= 1 to n do
if (mas[i] mod 2 = 0)
sum = mas[i] + sum;
Хотите чтобы ответы были верными? Видите много нарушений в сервисе? Узнайте кто такой Антиспамер" > здесь

---

Надо произведение, а вы сумму нашли.

---

вуаля)

---

Маладэц )0)