Вопрос по информатике:
найти сумму чисел заданного натурального числа. Блок схема, программа
- 17.03.2018 23:01
- Информатика
- remove_red_eye 14455
- thumb_up 48
Ответы и объяснения 1
Var a,s:integer;
begin
readln(a);
while (a0) do begin
s+=a mod 10;
a:=a div 10;
end;
writeln(s);
end.
- 18.03.2018 07:33
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.