Формулировка задачи:
Входные данные:
Во входном потоке задано единственное целое положительное пятизначное число
Выходные данные:
В выходной поток вывести единственное целое число.
Пример входного файла (input.txt):
49626
Пример выходного файла (output.txt):
27
Вот что у меня:
Как исправить?
Код к задаче: «Вычислить сумму цифр пятизначного числа»
textual
var n,s:integer;
begin
writeln('Введите 5-значное число n=');
readln(n);
s:=n div 10000+n div 1000 mod 10+n div 100 mod 10+n div 10 mod 10+n mod 10;
wtite('Сумма цифр=',s);
end.
Полезно ли:
7 голосов , оценка 4.143 из 5
|
0 / 0 / 0 Регистрация: 22.09.2017 Сообщений: 20 |
|
|
1 |
|
Вычислить сумму цифр пятизначного числа08.10.2017, 18:17. Показов 8219. Ответов 3
в) вввесты пятизначное целое число их. Вычислить сумму его цифр.
0 |
|
Megageorgio 79 / 81 / 66 Регистрация: 03.04.2017 Сообщений: 216 |
||||||||||||
|
08.10.2017, 19:51 |
2 |
|||||||||||
|
St1ko, всё зависит от фантазии
0 |
|
no swear 192 / 166 / 82 Регистрация: 01.07.2016 Сообщений: 942 |
||||
|
08.10.2017, 19:56 |
3 |
|||
0 |
|
Fixer_84 1505 / 968 / 812 Регистрация: 30.04.2016 Сообщений: 3,334 |
||||
|
08.10.2017, 22:09 |
4 |
|||
|
St1ko, здравствуйте. Вот еще (с использованием рекурсии):
0 |
// — комментарии, можешь не писать, это пояснение для тебя
var z,a,b,c,d,e,f: integer;
begin
Write(‘Введите пятизначное число’); read(z);
a:=a div 10000; // число десятков тысяч
b:=a mod 10000 div 1000; // число тысяч
c:=a mod 1000 div 100; // число сотен
d:=a mod 100 div 10; // число десятков
e:=a mod 10; // число единиц
f:=a+b+c+d+e; // сумма цифр
Writeln(‘Цифры: ‘, a,b,c,d,e);
Write(‘Сумма цифр: ‘,f);
end.
Решим задачу перебором. Заметим, что:
1. Ни одна из цифр не должна быть равна (displaystyle 0{small.})
2. Чисел будет не очень много, так как все цифры не могут быть очень большими. Иначе произведение будет больше суммы.
Отметим, что если взять пятизначное число со всеми цифрами (displaystyle geqslant 2{small,}) то их сумма будет меньше их произведения.
Значит, чтобы сумма и произведение были равны, среди цифр числа должна быть (displaystyle 1{small.})
Если единица ровно одна, то сумма все равно будет меньше произведения.
Значит, среди чисел, содержащих две (displaystyle 1{small,}) точно будет хотя бы один ответ к задаче.
3. Перебираем четные пятизначные числа, не оканчивающиеся нулем. Это уменьшает количество возможных чисел больше чем в (displaystyle 2) раза.
4. Перебор чисел от меньших к большим.
Тогда число (displaystyle 11152) является одним из возможных ответов к задаче.
Составить алгоритм и программу поиска всех цифр пятизначного числа нахождение, произведение и суммы всех цифр!
Заранее спасибо).
На этой странице находится ответ на вопрос Составить алгоритм и программу поиска всех цифр пятизначного числа нахождение, произведение и суммы всех цифр?, из категории
Информатика, соответствующий программе для 5 — 9 классов. Чтобы посмотреть
другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов
подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью
соответствующий критериям вашего поиска, можно найти с помощью простого
интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе.
Обратите внимание на варианты ответов других пользователей, которые можно не
только просмотреть, но и прокомментировать.
