Question

С клавиатура вводиться последовательность целых чисел. Число 0 служит признаком конца последовательности. Найти: сумму чётных чисел последовательности

Answer 1

program raf105;

var a,b:integer;

begin

writeln('Вводите числа по очереди');

writeln('Чтобы закончить введите 0');

a:=1;

while a<>0 do

begin

readln(a);

if (a mod 2) = 0

 then b:= b+a;

end;

writeln('Сумма чётных чисел: ',b);

end.

Программа написана на языке PascalABC.NET

Answer 2

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

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

pythonCopy code
# Инициализируем переменную для хранения суммы четных чисел
sum_of_even_numbers = 0

# Цикл для ввода чисел с клавиатуры
while True:
    try:
        number = int(input("Введите число (для завершения введите 0): "))
        if number == 0:
            break  # Выход из цикла, если введено 0
        elif number % 2 == 0:
            sum_of_even_numbers += number
    except ValueError:
        print("Некорректный ввод. Пожалуйста, введите целое число.")

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

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