すごい蛇足ですが数学の質問スレになっていたので少しアルゴリズムの話に。
似たようなものにペラン数列というものがあります。
32771番目の素数までを簡単に判別できる数です。
#runtime "hsp3cl"
// ペラン数列
// P(n) = P(n-3) + P(n-2)
// P(-3) = -1, P(-2) = 1, P(-1) = 3
// 定義
pre3 = 1
pre2 = -1
pre1 = 3
Pn = 3
// 探索
repeat 80, 1 ; longintなどを用いるとより多くの素数が見つけられる
Pn = pre3 + pre2 ; P(n) = P(n-3) + P(n-2)
pre3 = pre2 ;
pre2 = pre1 ; 計算には3つの数だけが必要
pre1 = Pn ;
if ( Pn \ cnt == 0 ) & ( cnt != 1 ){
mes cnt
}
loop
stop