Question

Составе программу которая находит сумму четных чисел и произведение нечетных чисел в диапазоне от 1 до 10

Answer 1

// PascalABC.NET 3.0, сборка 1088
begin
  Writeln('Сумма четных от 1 до 10 равна ',
    Range(2,10,2).Sum);
  Writeln('Произведение нечетных от 1 до 10 равно ',
    Range(1,10,2).Aggregate((x,y)->x*y))
end.

Результат выполнения программы:
Сумма четных от 1 до 10 равна 30
Произведение нечетных от 1 до 10 равно 945

Answer 2

Конечно, я могу помочь с написанием программы на каком-то конкретном языке программирования. Давайте рассмотрим пример на языке Python:

# Определение функции для нахождения суммы четных чисел и произведения нечетных чисел
def sum_and_product(start, end):
    sum_even = 0
    product_odd = 1

for number in range(start, end + 1):
        if number % 2 == 0:
            # Четное число - добавляем к сумме
            sum_even += number
        else:
            # Нечетное число - умножаем на произведение
            product_odd *= number

return sum_even, product_odd

# Задаем диапазон от 1 до 10
start_range = 1
end_range = 10

# Вызываем функцию и выводим результаты
result_sum, result_product = sum_and_product(start_range, end_range)
print(f"Сумма четных чисел в диапазоне от {start_range} до {end_range}: {result_sum}")
print(f"Произведение нечетных чисел в диапазоне от {start_range} до {end_range}: {result_product}")

Этот код определяет функцию `sum_and_product`, которая принимает начальное и конечное значения диапазона. Затем она использует цикл для итерации по числам в этом диапазоне, находит сумму четных чисел и произведение нечетных чисел. Результаты выводятся на экран.

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