Question

Дан массив из 15 целых чисел. Найти произведение элементов массива, кратных 3. Элементы массива, значения которых = 0, не считать кратные 3. Sample Input 1: -5 4 6 3 -1 7 0 7 8 -4 -6 -9 7 -2 1 Sample Output 1: 972 Sample Input 2: -10 -2 -5 0 8 2 8 -8 5 -3 8 -2 -9 -6 -9 Sample Output 2: 1458 Sample Input 3: 5 5 7 5 8 -10 8 4 -5 -1 -5 9 -5 -8 0 Sample Output 3: 9

Answer 1

Var
a:array[1..15] of Integer ;
i,p:Integer;
begin
p:=1;
for i:=1 to 15 do
begin
read(a[i]);
if (a[i] mod 3 = 0) and (a[i] <>0) then p:=p*a[i];
end;
Writeln(p);
end.

Answer 2

Для решения этой задачи, вам нужно выполнить следующие шаги:

1. Создайте массив, содержащий 15 целых чисел из входных данных. 2. Инициализируйте переменную `product` для хранения произведения элементов, кратных 3, начиная с 1. 3. Пройдитесь по элементам массива с помощью цикла (например, цикла `for`), и для каждого элемента выполните следующие действия:

a. Проверьте, является ли элемент кратным 3, используя оператор остатка от деления (%). Если элемент делится нацело на 3 (остаток равен 0), и не равен 0 (т.е., он не равен 0), выполните следующее действие: b. Умножьте `product` на текущий элемент массива.

4. Выведите значение `product` как результат.

Вот пример кода на Python, который решает данную задачу:

# Входные данные: массив из 15 целых чисел
input_array = [-5, 4, 6, 3, -1, 7, 0, 7, 8, -4, -6, -9, 7, -2, 1]

# Инициализируем переменную для произведения
product = 1

# Проходимся по элементам массива
for num in input_array:
    # Проверяем, кратен ли элемент 3 и не равен ли он 0
    if num % 3 == 0 and num != 0:
        product *= num

# Выводим результат
print(product)

Теперь приведу решения для примеров ваших входных данных:

Sample Input 1: -5 4 6 3 -1 7 0 7 8 -4 -6 -9 7 -2 1 Sample Output 1: 972

Sample Input 2: -10 -2 -5 0 8 2 8 -8 5 -3 8 -2 -9 -6 -9 Sample Output 2: 1458

Sample Input 3: 5 5 7 5 8 -10 8 4 -5 -1 -5 9 -5 -8 0 Sample Output 3: 9

Эти решения используют алгоритм, описанный выше, чтобы найти произведение элементов массива, кратных 3, исключая элементы, равные 0.