Question

Дан массив из 7 элементов. Найти произведение четных чисел и кол-во нечётных

Answer 1

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadArrInteger(7);
  Write('Произведение четных: ',
    a.Where(x->x.IsEven).Aggregate(1.0,(x,y)->x*y),
    ', количество нечетных: ',a.Where(x->x.IsOdd).Count)
end.

Пример
-15 8 42 11 95 118 -27
Произведение четных: 39648, количество нечетных: 4

Answer 2

#include <iostream>

using namespace std;

int main() {
 int a[7];
 int k = 0, p = 1;
 for(int i = 0; i < 7; i++) {
   cin >> a[i];
   if(a[i] % 2 == 0) p*=a[i];
   else k++;
 }
 cout << "Произведение: " << p << endl << "Количество: " << k << endl;
}

Answer 3

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

pythonCopy code
# Заданный массив из 7 элементов
arr = [2, 3, 4, 5, 6, 7, 8]

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

# Проходим по каждому элементу массива
for num in arr:
    if num % 2 == 0:  # Проверяем, является ли число четным
        product_of_evens *= num  # Умножаем на произведение четных чисел
    else:
        count_of_odds += 1  # Увеличиваем счетчик нечетных чисел

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

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