Напишите программу в паскале с оператором repeat дано целое число n (> 0) используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр (n=63)
alamez69
1
16.05.2019 18:04
0
Другие вопросы по теме Информатика
Posrednikova04
29.01.2021 06:41
danila110420051
27.03.2020 20:42
mriya1987
27.03.2020 20:39
alexander124131
19.09.2019 01:50
ваня2007123
19.09.2019 01:50
555555Эвелина
16.11.2020 18:05
taya99191
22.09.2019 19:20
vovadavydov56
22.09.2019 18:12
Популярные вопросы
- Диагонали прямоугольника abcd пересекаются в точке о. найдите угол boa,...
1 - Почему все пористые строительные материалы ( пористый кирпич, пеностекло,...
1 - А1. в какой строке слова являются словосочетанием? 1. объяснил правило...
2 - Решите систему уравнений 3x+4y=13 x-4y=-1 в ответе запишите сумму x+y где...
1 - Даны неправильные дроби 9/5; 13/2; 47/20 укажите равные им смешанные числа...
2 - Придумайте и запишите в которых данные прилагательные употреблялись бы...
1 - пример: слово: оглянулся объяснение: взгляд, гласные в корне проверяемые...
1 - Вершины треугольника abc имеют координаты a(-7; 5), b(3; -1), c(5; 3) найти...
3 - Вчем порадоксальнось улицы произведение «последний лист»...
3 - 5. в сосуд налита вода,s-100см²,h-12см, h-12 см. какую работу нужно совершить,...
3
var n,l,s,k:int64;
begin
read(n);
repeat
k:=n mod 10;
s:=s+k;
l:=l+1;
n:=n div 10;
until n=0;
write(l,' ',s);
end.
Объяснение: