Сверхпростое число |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Сверхпростое число |
Oboroten |
Сообщение
#1
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Александр Репутация: 0 |
Дано натуральное число N
Назовем простое число сверхпростым, если все числа, полученные из N перестановкой его цифр тоже простые. Написать программу для определения является ли данное число сверхпростым. 1<=N>=2 147 483 647 Как это сделать? Как организовать получение всех возможных вариантов чисел перестановкой??? |
Ozzя |
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: 16 |
Проверка: простое-ли число.
http://forum.pascal.net.ru/index.php?showtopic=3916 Перестановки http://forum.pascal.net.ru/index.php?showtopic=3777 Сообщение отредактировано: Ozzя - |
volvo |
Сообщение
#3
|
Гость |
Преобразуй число (N попадает в диапазон типа LongInt) в строку, и смотри сюда:
Вывод всех возможных перестановок строки Abc Каждую из перестановок преобразовать обратно в число, и проверять на простоту... Как только одно из проверенных чисел - НЕ простое, немедленный выход из программы с печатью соотв. сообщения... |
volvo |
Сообщение
#4
|
Гость |
Oboroten, + поиск по форуму: Сверхпростые числа, Перестановки цифр
|
Oboroten |
Сообщение
#5
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Александр Репутация: 0 |
Спасибо
|
Текстовая версия | 13.11.2024 18:23 |