Дан массив B (N), N=7. Найти сумму значений элементов, стоящих в массиве на четных местах.

Question

Информатика

Вениамин

28 июля, 19:28

Дан массив B (N), N=7. Найти сумму значений элементов, стоящих в массиве на четных местах.

+3

Ответы (1)

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

Яна · Answer 1

Var const n=7; I, sum:integer; B:array[1 ... N] of integer; Begin Sum:=0; For I:=1 to N do Readl B[I]; For I:=1 to N do Begin If I mod 2=0 then sum:=sum+B[i]; End; Writeln (sum) ; End.