Простое число Бельфегора
Сначала само число:
Заметим, что число это не только простое, оно еще является палиндромом (то есть если мы запишем все его цифры в обратном порядке, то получится то же самое число). Дьявольскими в числе является не только три цифры , стоящие подряд, но и 13 нулей, которые отделяют эти три шестерки от единиц слева и справа.
Символ числа Бельфегора:
Напоминает перевернутое число . Впервые этот символ появился в так называемой рукописи Войнича — очень интересной книге, которую не смогли прочитать до сих пор. “Самая загадочная рукопись в мире” создана в начале 15 века (1404—1438 гг.), возможно в северной Италии. Названа она по имени Вилфрида Войнича, библиофила и антиквара из Каунаса (мужа известной писательницы Этель Лилиан Войнич, автора “Овода’’). Войнич приобрел рукопись в 1912 г. В настоящее время рукопись находится в библиотеке редких книг и рукописей Бейнеке Йельского униерситета. Рукопись пытались расшифровать много раз (в том числе такие попытки делали армейские шифровальщики Англии и Америки), но безуспешно. Ясно только, что искусственный язык, на котором она написана, имеет четкую логическую структуру.
Теперь немного о самом Бельфегоре. Это могущественный демон, курирующий технический прогресс, демон открытий и изобретений. Он соблазняет людей, предлагая им гениальные изобретения, способные принести богатство. В соответствии с утверждениями демонологов 16 века, наибольшую силу Бельфегор имеет в апреле.
Вот и он сам:
Кто данному числу дал такое название, тоже непонятно. Возможно, это сделал Клиффорд Пиковер, причем недавно. Тем не менее получилось довольно забавно, не так ли?
1 Лейб:
Я заменил в числе Бельфегора “плохое” число
на “хорошее” число
(которое считается очень “счастливым”, например, в казино) и при помощи компьютерной программы NIGMA обнаружил, что полученное число:
.
.
оказалось ПРОСТЫМ !
.
[Ответить]
3 Март 2013, 18:132 Сергей:
Если заменить в числе Бельфегора число 666 на число 888(999,555,444,333,222,111),то обнаружим что все полученные числа,увы,СОСТАВНЫЕ.
[Ответить]
3 Март 2013, 18:463 Вячеслав:
Очень красивые числа, а Вы, Лейб и Сергей, молодцы, что умеете находить такие числа.
[Ответить]
4 Март 2013, 17:424 Лейб:
Неожиданно обнаружилось вот такое довольно любопытное простое число:
.
.
[Ответить]
4 Март 2013, 18:585 Лейб:
А вот еще одно “экзотическое” простое число-палиндром, найденное только что:
.
[Ответить]
4 Март 2013, 19:036 Сергей:
А вот еще одно простое 1000123456789876543210001
[Ответить]
4 Март 2013, 19:147 Лейб:
Нашел еще два красивых “монстра” среди простых чисел-палиндромов:
.
1009876543210123456789001
.
1000000009876543210123456789000000001
.
Образуется уже некоторая забавная коллекция.
[Ответить]
4 Март 2013, 21:178 Лейб:
И еще два, только что найденных, простых числа-палиндрома:
.
1357900097531
.
13579999999999999999999999999999999997531
[Ответить]
4 Март 2013, 23:089 Вячеслав:
Уважаемый Лейб, с трудом верится, что такая красота правдоподобна! Чудесно, восхитительно! А может быть это и не простые числа и это Вы всё просто сочинили?
[Ответить]
5 Март 2013, 13:1510 Лейб:
Я уже писал в пункте 1, что такие числа проверяются при помощи компьютерной программы NIGMA.
Ее можно найти в Интернете
[Ответить]
5 Март 2013, 13:2111 Вячеслав:
Я пытался воспользоваться программой NIGMA, но у меня ничего не получилось, я не умею программировать.
[Ответить]
5 Март 2013, 22:0312 Лейб:
Можно открыть программу NIGMA, например, в Google, набрав:
.
Список решаемых задач
.
Затем нажать:
Список решаемых задач
.
А там есть много чего, чем можно пользоваться, вовсе не умея программировать
[Ответить]
6 Март 2013, 9:0413 Таинственная рукопись содержит реальное послание | Математика, которая мне нравится:
[...] называемая рукопись Войнича (о ней уже упоминалось здесь) является [...]
24 Июнь 2013, 21:3014 Владимир:
При факторизации числа, состоящего из 93 семёрок нашёл красивое простое число:
900900900900900900900900900900990990990990990990990990990991
[Ответить]
8 Апрель 2016, 21:2215 Владимир:
В Wolfram Mathematica простые палиндромы находятся на “раз-два”:
Do[If[IntegerDigits[Prime[k]] == Reverse[IntegerDigits[Prime[k]]],
Print[Prime[k]]], {k, 1, 2000000}]
[Ответить]
8 Апрель 2016, 22:29