最速の素数判定アルゴリズム　　

>>124
J=I*2　にしてるけど、Jより小さい素数の倍数は不要でしょう？
説明すると、
まずは２刻みに４以上を全部消すよね？
次は３刻みなんだけど６は既に消えてるし２の倍数は消えてるから９から消す
その次は５刻みだけど
やっぱり５＊２　も５＊３も消えてるから５＊５から１０刻みに消せばいい

つまり素数N番目は N*Nから 2N刻みに消せばいい

Stepが使えるかどうか知らないんだけど　StepN はN刻みって事ね
で、FOR文がTO 以下なら繰り返すんだとして


Limit = Int(Sqr(Num))
　For J = 4 To Num Step 2:sosuu(J) = 0:NextJ
　　　　For I = 3 To Limit Step 2
　　　　　　If sosuu(I) = 1 Then
　　　　　　　　For J = I*I To Num Step 2*I
　　　　　　　　　　　　sosuu(J) = 0
　　　　　　　　Next J
　　　　　　End If
　　　　Next I

FORについてる I*I や 2*I　がループ中再評価されるんなら外に出してね