WhiteBurn
09.02.2022 13:24

Найти сумму чисел заданного натурального числа. блок схема, программа

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Лиана891
06.07.2020 11:26
Var a,s:integer;
begin
readln(a);
while (a<>0) do begin
s+=a mod 10;
a:=a div 10;
end;
writeln(s);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота