В массиве D(10) найти сумму чисел , расположенных ** нечетных местах. Пожалуйста ,...

Question

В массиве D(10) найти сумму чисел , расположенных на нечетных местах. Пожалуйста , помогите. бейсик

Answer 1

CLS
DIM D(10)
DATA 12,10,11,34,3,3,2,3,4,5
S = 0
FOR i = 1 TO 10
READ D(i)
IF i / 2 = i \ 2 THEN
ELSE
S = S + D(i)
END IF
PRINT D(i),
NEXT i
PRINT "S="; S