Написать программу, которая находит сумму всех цифр введенного с клавиатуры четырехзначного числа
yanakisleiko
3
15.09.2019 21:40
1
Другие вопросы по теме Информатика
1MQL2
10.03.2019 09:20
mkalashnik1983
10.03.2019 09:10
said97
10.03.2019 09:10
irishkakrasa
10.03.2019 09:10
trohy71
10.03.2019 09:00
01029283736463637
10.03.2019 08:50
Sasha2771
10.03.2019 08:30
Interworm
10.03.2019 08:20
dias2266
10.03.2019 08:20
Популярные вопросы
- 1)сумма величин двух вертикальных углов а и в равна 150(градусам).найдите...
1 - Match the words that rhyme cake time ever fun been saw fly girl air...
2 - Решите уравнение и сделайте проверку 2) 8 + у = -3 4) - 6 + х = -...
3 - Решите с уравнения саша задумал число умножил его на 18 к полученому...
2 - Вид спорта заставляет работать суставы и делает тебя гибким и ловким...
3 - Тарас бульба и маттео фальконе ( черты характера героев, причина,...
3 - Наведіть формули речовин, які входять до складу повітря. !...
3 - Предложения к этим вопросам. what/do in the morning? what/make for...
2 - Прочитай текст.подумай, какой это текст описание или повествование....
1 - 1)сумма величин двух вертикальных углов а и в равна 150(градусам).найдите...
3
a,sum:integer;
begin
Read(a);
while (a > 0) do begin
sum += a mod 10;
a := a div 10;
end;
Writeln(sum);
end.