|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.11.2010, 16:51 | #1 | |
Пользователь
Регистрация: 06.11.2010
Сообщений: 15
|
список всех четырехзначных нечетных чисел, делящихся без остатка на сумму своих цифр.
На отрезке [A;B] вывести список всех четырехзначных нечетных чисел, делящихся без остатка на сумму своих цифр.
Помогите испрвить ошибку. Код: Цитата:
Последний раз редактировалось Kami-sama; 12.11.2010 в 17:09. |
|
12.11.2010, 17:03 | #2 |
Форумчанин
Регистрация: 02.02.2010
Сообщений: 599
|
Неохото в вашем зеленом коде разбираться. Если вам не принципиально, готов предложить свой вариант:
Код:
"Лишь то читается легко, что написано с трудом; что в час написано, то в час и позабыто."
Последний раз редактировалось Syuf; 12.11.2010 в 17:06. |
12.11.2010, 17:07 | #3 | |
Пользователь
Регистрация: 06.11.2010
Сообщений: 15
|
спс, за ответ.
прошу прощения за опрометчивость только что сам нашел ошибку. просьба модераторов удалить тему. Если вдрук кому понадобиться вот исправленный рабочий код: Цитата:
Последний раз редактировалось Kami-sama; 12.11.2010 в 17:11. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Составить программу, определяющую количество чисел, делящихся без остатка на три | phoenixSV | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 05.12.2008 15:05 |
Вывод чисел, делящихся на каждую из своих цифр. Паскаль | ЯншинаВера | Помощь студентам | 3 | 08.04.2008 11:50 |
Найти сумму положительных нечетных чисел меньше 50 | мандаринка | Паскаль, Turbo Pascal, PascalABC.NET | 8 | 22.12.2007 21:45 |