vstef
23.08.2022 11:10

Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается нулем.(a=0 признак окончания ввода , ноль не входит в последовательность). программа должна вывести количество и сумму всех чисел последовательности.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
КривенкоЖеня
03.10.2020 17:24
Var a, b, c: integer;
begin
b:=0;
c:=0;
readln(a);
while a <> 0 do
begin
b:=b+1;
c:=c+a;
readln(a);
end;
writeln('Кол-во: ',b);
writeln('Сумма: ',c);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота