|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
01.03.2010, 00:42 | #1 |
Новичок
Джуниор
Регистрация: 01.03.2010
Сообщений: 0
|
Сумма цифр из числа.
Задача, конечно, легкая, но почему-то она не работает, как надо: не находит сумму цифр из введенного числа, например, "вводим 123 ->1+2+3 т.е. 6". Надеюсь, укажите на ошибки, хотя я уверен в логичности программы.
Программа: http://s40.radikal.ru/i088/1002/21/a906b4662f05.jpg . |
01.03.2010, 02:03 | #2 |
Босс
Форумчанин
Регистрация: 03.06.2009
Сообщений: 125
|
255507394.
Две одинаковые вложенные ошибки называются четной ошибкой и ошибкой не являются. Ася 255507394. Отзывы здесь. |
01.03.2010, 02:08 | #3 |
Форумчанин
Регистрация: 06.06.2008
Сообщений: 105
|
<--Ввод данных-->
s:=0; while n > 0 do begin s := s + n mod 10; n := n div 10; end; <---Вывод рез-тов--> Наслаждайся |
01.03.2010, 07:56 | #4 |
Форумчанин
Регистрация: 16.02.2010
Сообщений: 316
|
var a,x:integer;
s:integer; begin writeln('введите целое число'); readln( a ); x:=a; s:=0; while ( x<>0 ) do begin s := s + (x mod 10); x := x div 10; end; writeln( 'Сумма цифр числа ',a,' = ', s ); end. |
02.03.2010, 21:16 | #5 |
Новичок
Джуниор
Регистрация: 01.03.2010
Сообщений: 0
|
ахахах.) я оказывается просто не правильно брал целочисленное деления и остаток, надо было пометь местами "n" с "10" у дива и мода, но все равно спасибо за решение, у меня оно на одно действие больше, т.е. можно считать оно лишние.)
|
02.03.2010, 21:18 | #6 |
Новичок
Джуниор
Регистрация: 01.03.2010
Сообщений: 0
|
а вы оперативные, думал моя тема не создалась даже т.к. в ЛК счетчик сообщений и тем был на нуле.
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сумма цифр введенного трехзначного числа. Дельфи | by -ORTODOX- | Помощь студентам | 20 | 02.02.2011 14:21 |
Сумма цифр числа... | Dimak67 | Microsoft Office Excel | 5 | 09.04.2010 00:46 |
в паскале. Сумма цифр числа | Siroga35 | Помощь студентам | 3 | 17.06.2009 14:54 |
Сумма цифр числа в ячейке | Arlen | Microsoft Office Excel | 9 | 16.05.2009 12:10 |
сумма цифр целого числа | mihsel | Microsoft Office Excel | 8 | 13.04.2009 13:57 |