>>540
エラトステネスの篩のつもりです。調べて見つけたアルゴリズムを参考に書いて見ました。

>>541
j=a-1;
ですか!