Question

Помогите решить задачу!!! Вводится последовательность из N целых чисел найти произведение всех четных чисел больше 10

Answer 1

Вроде бы так... подправь если что)
uses crt;
const N=10;
var i,p:integer; a:array[1..N] of integer; {кол эл массива }
begin
p:=0;
writeln('введите исходный массив');
for i:=1 to N do {цикл по кол э}
begin
write('a[',i,']='); readln(a[i]); {ввод эл массива}
if (a[i] mod 2)=0 then p:=p+1;
end;
write('p='); writeln(p);
readln
end.

Answer 2

Конечно! Я могу помочь вам решить эту задачу. Вот пример кода на языке Python, который находит произведение всех четных чисел, больших 10, в последовательности:

pythonCopy code
# Вводим количество чисел в последовательности
N = int(input("Введите количество чисел в последовательности: "))

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

# Цикл для ввода чисел и вычисления произведения
for i in range(N):
    число = int(input("Введите число: "))
    if число % 2 == 0 and число > 10:
        произведение *= число

# Выводим полученное произведение
print("Произведение четных чисел, больших 10:", произведение)

Вы можете скопировать этот код и запустить его на своем компьютере, чтобы решить задачу. Программа запросит вас ввести количество чисел в последовательности, а затем числа самих по себе. После того, как вы введете все числа, программа выведет результат - произведение всех четных чисел, больших 10.