CLS
DIM mas(0 to 9)
DIM summa
i = 0
WHILE i < 10
INPUT "ELEMENT MASSIVA: ", a
mas(i) = a
IF mas(i) > 25 THEN
summa = summa + mas(i)
END IF
i = i + 1
WEND
PRINT "Otvet: ", summa
Тестирование выполнено в программе QB64 ( Скачать )
CLS
DIM mas(0 to 9)
DIM summa
i = 0
WHILE i < 10
INPUT "ELEMENT MASSIVA: ", a
mas(i) = a
IF mas(i) > 25 THEN
summa = summa + mas(i)
END IF
i = i + 1
WEND
PRINT "Otvet: ", summa
Тестирование выполнено в программе QB64 ( Скачать )