1. Информатика
  2. Дано натуральное число.

Дано натуральное число. определите сумму цифр в нем

Kapusto4ga Kapusto4ga    3   18.09.2019 01:40    0

Ответы
VanoK48 VanoK48  07.10.2020 23:01
Var a,s:integer;
begin
readln(a);
s:=0;
while a>0 do
 begin
 s:=s+a mod 10;
 a:=a div 10;
 end;
writeln('s = ',s);
end.

Пример:
13854
s = 21
ПОКАЗАТЬ ОТВЕТЫ
валера344 валера344  07.10.2020 23:01
Разделить на 2 и умножить число которое получилось
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Anastasiya2108 Anastasiya2108  18.11.2020 06:18
Создать таблицу и построить по данным из таблицы 5 разных диаграмм....
sahrona04 sahrona04  18.11.2020 06:17
по термохимическому уравнению реакции S + O2 равно SO2 + 296,9 кДж. Расчитайте объем кислорода (н.у.) необходимого для получения 44,54 кДж? ​...
43446764949 43446764949  18.11.2020 06:17
Сколько бит в памяти компьютера займёт слова случилось ​...
NoAl3 NoAl3  18.11.2020 06:16
теплота образования 1 моль оксида серы (IV) равна 297 кДж. При окислении серы объемом 224л (н.у.) выделится кол-во теплоты равное... ​...
Vika140220081 Vika140220081  18.11.2020 06:15
Выражение африканский слон это понятие или суждение? ​...
alinaislam371 alinaislam371  18.11.2020 06:01
Пользователь работал с каталогом Укажи полный путь для того каталога, в котором оказался пользователь: А. D:\ДОКУМЕНТЫ\ФОТО\ИНФОРМАТИКА Б. D:\ДОКУМЕНТЫ\ИНФОРМАТИКА\ЭКЗАМЕН...
Ахмрев Ахмрев  18.11.2020 06:01
4Сөйлемдерді аяқта:СРЗНАЧ) функциясы ...МИН() функциясы ..МАКС) функциясы ...​...
Nemp2 Nemp2  18.11.2020 06:00
Правильно решил? Что недостающего, и как заполнить?...
Ksyxa03 Ksyxa03  18.11.2020 05:48
Сначала он поднялся на 1 уровень вверх, затем спустился в каталог в СТРАТЕГИИ, после чего спустился в каталог ФАРАОН. Каков полный путь к каталогу, в котором оказался пользователь?...
MrCriMa MrCriMa  18.11.2020 05:47
1. Для чего применяется таблица? 2. Перечислите основные компоненты таблицы. Для чего они нужны?3. Какие создания таблиц вы знаете?4. Что такое форматирование данных?5)...

Популярные вопросы