ktdgegrbyfk
24.04.2022 14:52

Напишите программу, которая в последовательности целых чисел определяет из колличество и сумму четных чисел. программа получает на ход целые числа, колличество введенных чисел неизвестно послкдовательность чисел заканчивается числом 0 признак окончания ввода не взолит в последовательность. колличество чисел не привышает 1000. введеные числа по модулю не привышают 30000. программа должна вывести два числа длину последовательности и сумму четных чисел.
введные данные выходные
4 3
60 64
15
0

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
antstuart
11.10.2020 21:54

program kol_sum_chet;

var

x,k,s:integer;

begin

k:=0;

s:=0;

repeat

read(x);

if x mod 2=0

then

begin

s:=s+x;

inc(k);

end;

until x=0;

write(k,' ',s)

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота