Question

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

Answer 1

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

Answer 2

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

Answer 3

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

Answer 4

вуаля)

Answer 5

Маладэц )0)