Сверхпростое число - это число, которое при всякой перестановке его цифр остается простым. Вывести список таких цифр от 1 до 1000.
К сожалению, у меня работает некорректно (перебираются не все перестановки и выводятся лишние числа), поэтому обратилась за помощью.
Могу прислать мой код, если понадобится.
С уважением,
http://forum.pascal.net.ru/index.php?showtopic=3916&view=findpost&p=32236
Вот там есть процедура для проверки на простое число. Переделать и проверять на супер простое .
Медленно, но верно.
Tauka, и все-таки код, если можно, присоедините сюда... Может и заработает...
Tauka, посмотрите вот эту программу. Я думаю, Вы найдете в ней много интересного (включая алгоритм генерации перестановок).
Прикрепленные файлы
super_s.pas ( 1.71 килобайт )
Кол-во скачиваний: 510