Свходные данные вводится натуральное число x. выходные данные выведите сумму цифр числа x. примеры входные данные 123 выходные данные 6 входные данные 102 выходные данные 3
chvdima
1
05.07.2019 09:50
2
Другие вопросы по теме Информатика
2003Саша
27.05.2019 12:30
Megatrolll228
27.05.2019 12:30
priutkorel
03.04.2021 01:36
zzzzzzya2017
11.07.2019 20:10
mila7772
11.07.2019 20:10
анна2167
11.07.2019 20:10
LiraReeman
30.11.2020 13:57
wokef1
30.11.2020 13:57
Популярные вопросы
- 1.На примере отношений среднеазиатских ханств и казахов южного Казахстана...
1 - Курение, употребление алкоголя-вредные привычки, мешающие правильному...
1 - Почему у растений выращеного из черенка не может сформироваться стержневая...
2 - Позначте логічні вирази, що набувають значення True при х = 5, у =...
3 - Решить 669 полными ответами ...
2 - Краткое содержание 7 предложений.Для читательского дневника.Два капитана...
1 - 5) xmaх= ymax = xmin = ymin = ответ:5. Найдите наименьшее и наибольшее...
1 - Внутренняя политика Александра I в 1801-1806гг 1. Расскажите о том,...
2 - Разность квадратов двух выражений. Урок 1 Соедини равные выражения.(2x...
3 - 19/20-4/158-5/173 6/7×1 8/93 9/10:1 13/20 решить ...
1
x,s:integer;
begin
write('x=');
readln(x);
while x>0 do
begin
s:=s+(x mod 10);
x:= x div 10;
end;
writeln('s=',s);
end.