Найти произведение элементов кратных трем

Категория: Basic
2012-02-21 16:33:58

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

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

автор: кот Бегемот

Поделиться:

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

теги: массив, одномерный массив, студенты, qbasic, произведение, отрицательные, положительные, произвольные числа