Найти произведение элементов кратных трем. — Basic(Бейсик)

Имеется массив А из N произвольных чисел А(N), среди которых есть положительные, отрицательные и равные нулю. Например, если А={2,4,9,2,6,–3,0}, результат: 9*6*(–3)=–162.

p=1
FOR i=1 TO n
IF a(i) MOD 3=0 THEN p=p*a(i)
NEXT
PRINT p

Leave a Comment