Найти сумму цифр четырехзначного числа через цикл с постусловием
romashka412
2
26.06.2019 17:00
3
Другие вопросы по теме Информатика
prosto5297
06.09.2019 10:40
gjhjcznrj
15.07.2019 07:30
levyjigor45
08.07.2019 03:50
rinnavinn
08.07.2019 03:50
danilmuratov20p02c8m
08.05.2020 04:32
1Маша1231111
08.05.2020 04:31
Binnez
08.05.2020 06:26
grange
08.05.2020 06:23
Популярные вопросы
- 1. Вычислите объем аммиака (н.у.) и массу раствора с массовой долей ортофосфатной...
2 - Найдите первообразную функции f(x), график которой проходит через точку А,...
3 - Найдите положительный корень уравнения Lg(x^2-7x-7) =0...
3 - Найдите точку максимума функции надо, ...
3 - Вычислите интеграл 2 l 1 x^4dx...
2 - Найти максимум f(x)=x^3-12x+10...
1 - Найдите точку минимума функций y=(x+17)e^x-12 Очень Ребята выручайте!...
1 - Кинетическая энергия тела, брошенного с некоторой высоты со скоростью 10м/с,...
3 - 1.1. Выберите правильные формы для глагола делать . Infinitive Past Simple...
3 - Являются ли взаимно простыми числа: 1 16 и 37 2 16, 37 и 38 3 5, 9, 27 и 54...
2
begin
readln (a);
repeat
s:=s+a mod 10;
a:=a div 10;
until a=0;
writeln (s);
end.