Vspichka
11.11.2020 03:52

Дано натуральное число. определите сумму цифр в нем

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
grht1
07.10.2020 23:01
Var a,s:integer;
begin
readln(a);
s:=0;
while a>0 do
 begin
 s:=s+a mod 10;
 a:=a div 10;
 end;
writeln('s = ',s);
end.

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