Дано число. определить сумму цифр в этом числе.
kokocuk01
2
15.07.2019 23:40
1
Другие вопросы по теме Информатика
kutirev123p
28.10.2020 06:51
Мэри6669
12.08.2019 01:30
Диана149018
12.08.2019 01:30
Елизавета5820
12.08.2019 01:30
Pawel10hor
12.08.2019 01:30
Vika3839
12.08.2019 01:30
tatstryukova
12.08.2019 01:20
romasivtsov
12.08.2019 01:20
Популярные вопросы
- 10. Яку групу за значенням позначає вигук з речення: Марш додому, щоб я...
2 - 1. Как роман А. И. Гончарова Обломов отражает общественные настроения 1844-1855гг....
1 - У вірші «Мені тринадцятий минало» Т. Шевченко розмірковує про а) долю дітей-сиріт...
2 - Лабораторна робота № 7. Вивчення закону збереження механічної енергії Вивчення...
1 - Закончи разделительный вопрос (вопрос с хвостиком) Запиши ТОЛЬКО хвостик...
3 - 272:850, 0,17:680, 2114,1:27 решіть в стопчик і напишіть в стопчик зробіть...
1 - Після завершення російсько-турецької війни 1768—1774 рр російський генерал...
1 - 3.У якому рядку всі записані сполучники є простими? а) Але, бо, чи, і,...
2 - Пословица - это - Миф это- Басня-это- Годы жизни И.А.Крылова Что такое...
3 - 3.Участников городского конкурса на лучший детский рисунок жюри разделило...
2
s,n: integer;
begin
readln(n);
s:=0;
while n>0 do
begin
s:=s+(n mod 10);
n:=n div 10;
end;
writeln(s);
end.