|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
26.11.2009, 11:28 | #1 |
Регистрация: 26.11.2009
Сообщений: 4
|
Паскаль. Из заданного числа найти сумму его цифр
Всем привет.
Помогите задачу решить пжлста на Паскале с помощью подпрограммы Из заданного числа найти сумму его цифр, из этого результата тоже найти сумму цифр и так далее пока в результате не будет одна цифра |
26.11.2009, 11:34 | #2 |
Форумчанин
Регистрация: 09.09.2009
Сообщений: 181
|
Один из вариантов: можно перевести изначальное число в string -> посимвольно считать -> переводить обратно и суммировать.
Получил помощь — отблагодарил.
|
26.11.2009, 11:42 | #3 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
26.11.2009, 11:53 | #4 |
Регистрация: 26.11.2009
Сообщений: 4
|
В одном числе и я могу
Например 18357345 1+8+3+5+7+3+4+5=36 затем 3+6=9 все подпрограммой? |
26.11.2009, 12:36 | #5 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
26.11.2009, 12:56 | #6 |
Ищу работу
Форумчанин
Регистрация: 16.02.2007
Сообщений: 269
|
процеда с проверкой на длину числа. и рекурсивное использование. в чем проблема то?
Пишу на Delphi все что угодно, недорого, красиво, с комментариями
###icq 107335###
|
26.11.2009, 13:25 | #7 |
Регистрация: 26.11.2009
Сообщений: 4
|
Да не врубаюсь че там посе procedure
|
26.11.2009, 14:13 | #8 |
Ищу работу
Форумчанин
Регистрация: 16.02.2007
Сообщений: 269
|
Код:
рекурсивность сам доковыряешь если нужно))
Пишу на Delphi все что угодно, недорого, красиво, с комментариями
###icq 107335###
Последний раз редактировалось Stilet; 26.11.2009 в 14:31. |
26.11.2009, 14:27 | #9 |
Регистрация: 26.11.2009
Сообщений: 4
|
Спасибо
Да читаю но чето не помогает |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
найти сумму цифр, состовляющих числа. | babaika | Общие вопросы C/C++ | 4 | 29.12.2008 08:58 |
#Delphi задача на сумму цифр числа | forumu | Помощь студентам | 11 | 12.01.2008 19:02 |
Подсчитать сумму цифр числа введеного с клавиатуры. Prolog | Дурин | Помощь студентам | 3 | 10.01.2008 16:29 |