> えと、whileのループをifのジャンプに変更したのはなぜでしょうか。
> こちらのほうが速いのですか？
私は while文をあまり使わないので、無意識に 慣れた IF文に変えてしまってました。(^^;
オリジナルのソースに wend を入れるだけでしたね。(^^;
#11179 で書きましたが
> ちなみに FOR文のソースにこのサブルーチンを組み込んだら
> Number.10000 0: 0:11 Prime Number = 1229
> ２〜３秒遅くなりましたね。これが関数とサブルーチンの速度差と思われます。
同じ条件では、while文の方が速いと思われます。
そこで、このサブルーチンの while と FOR で比較してみました。
FOR文 Number.100000 0: 2:51 Prime Number = 9592
WHILE文 Number.100000 0: 2:47 Prime Number = 9592
１０万で4秒の差でした。思ったよりも差が小さかったですね。
SQR １回あたり７〜１０回程度のループで済んでいるから差が小さいのでしょう。
> なのですが、まぁいろいろと存在しない事情をでっち上げて実家に顔を出すところ
> まではアポイント済み。ただ、時間が取れるかどうかは別問題なんで。
お手間を取らせて申し訳ないですが、よろしくお願いします。