Дан массив натуральных чисел,заполненный случайными числами. найти произведение элементов кратных 3.

Дан массив натуральных чисел,заполненный случайными числами. найти произведение элементов кратных 3.
Гость
Ответ(ы) на вопрос:
Гость
s := 1 ; for i := 1 to n do   if a[i] mod 3 = 0 then       s := s * a[i]; writeln(s);
Не нашли ответ?
Ответить на вопрос
Похожие вопросы