Project Euler 655

https://projecteuler.net/problem=655

自作問題です。
本当は、回分数の素数を求める問題が作りたかったのですが、うまくいかず、こういう形になりました。