Вычислить произведения элементов массива A1, A2, ..., A70, кратных 5

code: #basic
DIM A(1 TO 70)
sum = 0
FOR i = 1 TO 70
    A(i) = FIX(RND * 101)
    IF A(i) MOD 5 = 0 THEN sum = sum + A(i)
NEXT
PRINT sum

автор: Vovan-VE

Поделиться:

Похожие статьи: