С клавиатуры вводится 5 чисел от 0 до 10 знаков 0 включительно найти сумму цифр
лиза2695
3
16.03.2020 13:50
2
Другие вопросы по теме Информатика
Unicorn536
17.06.2019 15:00
играю4в4warface
31.05.2019 11:40
MilkyWay3355
14.01.2021 13:29
Lopkrtjvbbcx
19.05.2021 09:53
nugumanovsalavp092yo
19.05.2021 09:54
raulchikon
19.05.2021 09:55
filbert04
04.10.2019 10:50
Venichka200
04.10.2019 10:50
Популярные вопросы
- Знаменитость которая меня вдохновляет...
3 - А1. В основном состоянии наименьшее число неспаренных электронов имеет:...
3 - Пахарь.2. Как описывается весенний сев? Что привлекает особенное внимание...
1 - 3. Используя теорему о внешнем угле треугольника, найди угол х. помгите...
2 - Боковая сторона равнобедренного треугольника равна 12 см найдите основания...
3 - Дан массив в=[-2,4,10,-1,1,6,3,7,8,5]. Выполните сортировку методом...
3 - ,работа по тексту,фото текста в фото. Сұрақтарға жауап бер. 1.сен тұратын...
1 - Рауф копит на велосипед. Всего ему нужно накопить около 10 000 рублей....
1 - Из Доски 11 на 11 вырезали 15 квадратиков 2 на 2 в сетке . Докажите...
1 - Можно быстре дам сколко смагу...
3
program sum_cifr_5_chisel;
var
x, sum, i:int64;
begin
i:=1;
sum:=0;
while i<=5 do
begin
read(x);
while x>0 do
begin
sum:=sum+x mod 10;
x:=x div 10
end;
inc(i);
end;
write(sum)
end.