著名な数学者テレンス・タオさんが8歳で！完全数に関する論文（BASICでプログラム組んで計算）出してるって！そのプログラムをそのままカシオの高精度計算サイトkeisan.casio.jpに移植して桁数上げて計算。

このTweetみた。

This week we have Terence Tao's first published paper, in which he developed a program to find perfect numbers. The paper was published when Tao was 8 years old.

Paper here: https://t.co/ld5dEvArK4 pic.twitter.com/yRdDsVXSzo

— Fermat's Library (@fermatslibrary) October 26, 2021

当時から天才ぶりを発揮してるのか。私の8歳だったら完全数など知らないし、知っていてプログラムしろと言われても因数だして足し算して実際に一致することを確かめるしかできないだろうが、メルセンヌ数Mpが

M_p = 2^p − 1 が素数ならば、2^p−1(2^p − 1) は完全数

というのをちゃんと使っている。

こういうのもあったし。
え！ポール・エルデシュとテレンス・タオ、会ったことがあるの！

私にできそうなことはその8歳の時点のプログラムを桁数上げることだけ、、、

できるだけオリジナルのプログラムになるようにカシオの高精度計算サイト keisan.casio.jpに移植してみた。GOTO文の処理を悩む、、、があんまりかっこよくないが以下のようなプログラムリストに。

結果はこちら；

さすがに桁数だけは上がった。