因みにFOR TOループの後者の変数Eなのですが、以前ネットで調べたところ、ある数{E}のルートの数{SQR(E)}までの数で素数と証明される数が出現しなければ、それ以降の数{SQR(E)<E}にそれが証明される数はないそうです。 要するにEをそのままループするのではなく、EをSQR()処理をすれば軽くなりますよ、多分。