 Оптимизация решения..., помогите найти оптимальный вариант |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| zZz |
 18.04.2006 16:13
Сообщение
#1
|
 Пионер  Группа: Пользователи Сообщений: 55 Пол: Мужской Реальное имя: Алексей Репутация:  0   |
Задача такова: необходимо найти 1000 чисел не имеющих простых делителей кроме 2,3 и 5 (например 1,2,3,4,5,6,8,9,10,12,15,16,18,20,24...), за пару минут с while'ом написал программу просто перебирающую все варианты и проверяющую выполнимость условия, но проблема в том что такой вариант выполнения занимает много времени (секунд 10), хотелось бы узнать более оптимальный вариант решения... достаточно лишь описать что должен делать и в каком порядке алгоритм...
Сообщение отредактировано: zZz - 18.04.2006 16:16 |
   |
 
|
  |
Ответов
| klem4 |
19.04.2006 7:46
Сообщение
#2
|
 Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата дальше перебором находим такие m n k что новое значение m+n*(log по осн 2 из 3)+k*(log по осн 2 из 5) минимальное большее от предыдущего А до какого числа ты собрался делать перебор ? Вот например при m = 0 n = 5 k = 10 Выражение уже не влезает в longint, а 1000 чисел еще найдено не было. Сообщение отредактировано: klem4 - 19.04.2006 7:46 -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
Сообщений в этой теме
zZz Оптимизация решения... 18.04.2006 16:13
FreeMan приходит на ум вывести 1000 вариантов умножения 2,... 18.04.2006 17:01 zZz всем спасибо, ... нашел решение, представляем все ... 18.04.2006 18:04 zZz
забыл об одной фишке упомянуть: все в порядке в... 18.04.2006 18:30
zZz
А до какого числа ты собрался делать перебор ? Во... 19.04.2006 11:52 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 9.12.2025 0:24 |