Question

Помогите пожалуйста решить найти произведение и кол-во одномерного массива НЕ кратных числу 3

Answer 1

Предположим, что массив задан случайно и нам требуется найти количество элементов массива, которые не кратны 3 и их произведение (ваша формулировка задания немного неоднозначна)

var

a:array [0..20] of integer;

count,sum,i:integer;

begin

randomize;

for i:=1 to 20 do

begin

a[i]:=random(100);

if a[i] mod 3 <>0 then

begin

sum:=sum+a[i];

count:=count+1;

end;

end;

writeln('Изначальный массив: ', a);

writeln('Сумма элементов, не кратных 3: ', sum);

writeln('Количество элементов не кратных 3: ', count);

end.

Answer 2

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

1. Создайте одномерный массив с вашими числами.

2. Пройдитесь по каждому элементу массива и проверьте, кратен ли он числу 3. Если элемент не кратен 3, добавьте его к произведению.

3. Подсчитайте количество элементов, которые не кратны 3.

Вот пример кода на Python, который выполняет это задание:

pythonCopy code
# Ваш одномерный массив
arr = [1, 3, 6, 9, 12, 15, 18, 21]

# Инициализируем переменные для произведения и количества элементов
product = 1
count = 0

# Проходимся по элементам массива
for num in arr:
    if num % 3 != 0:  # Проверяем, не кратен ли элемент 3
        product *= num  # Умножаем на произведение
        count += 1  # Увеличиваем счетчик

# Выводим результат
print("Произведение элементов, не кратных 3:", product)
print("Количество элементов, не кратных 3:", count)

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