|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.02.2009, 19:13 | #1 |
Регистрация: 19.02.2009
Сообщений: 2
|
Pascal, задачка для 7 класса.
:D
Помогите, немогу решить задачку. *** Найти все натуральные числа, не превосходящие заданного n, которые делятся на каждую из своих цифр. *** Код:
Код:
Куча набросков, вобщем, есть и даже рабочая программа, но нерациональная и в три процедуры по-нубски оформлена ) Вобщем как-то так... поделитесь мыслями, кому не трудно.
Начинающий
|
19.02.2009, 19:28 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Вот оно. Естественно, деление на ноль (если число =20, 30 и т.п) не производим.
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
19.02.2009, 19:36 | #3 |
Форумчанин
Регистрация: 06.12.2008
Сообщений: 613
|
Код:
|
19.02.2009, 19:46 | #4 |
Регистрация: 19.02.2009
Сообщений: 2
|
Спасибо, Boolean тип не додумался использовать.
Ушел учить матчасть =\
Начинающий
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание своего класса в Delphi 7 - фигуры для шахматной доски | electric | Компоненты Delphi | 18 | 24.10.2013 15:06 |
С++ перегрузка операций для шаблонного класса | TIN | Помощь студентам | 7 | 29.03.2009 15:24 |
Правильная организация класса для работы с таблицей mysql | Choo | PHP | 10 | 08.08.2008 08:55 |
Задачка на Pascal | miron | Фриланс | 9 | 30.03.2008 15:03 |
Помогите составить базу данных - задние для 8 класса... | Наталья Шварц | Microsoft Office Excel | 2 | 14.03.2008 21:33 |