エラトステネスの篩
差分
このページの2つのバージョン間の差分を表示します。
両方とも前のリビジョン前のリビジョン | 次のリビジョン両方とも次のリビジョン | ||
エラトステネスの篩 [2022/01/06 11:25] – [プログラム] araki | エラトステネスの篩 [2022/01/06 11:31] – [プログラム] araki | ||
---|---|---|---|
行 32: | 行 32: | ||
つまり、作業領域として素数をストックしておく領域は高々41あれば事足りるので、IchigoJam BASICで扱える全ての素数を列挙すること自体は可能である。 | つまり、作業領域として素数をストックしておく領域は高々41あれば事足りるので、IchigoJam BASICで扱える全ての素数を列挙すること自体は可能である。 | ||
- | このコードは次のようになる。 | + | このコードは次のようになる。なお、素数2は、ターゲットから偶数を除外―3から開始して、2ずつ増加する、即ち奇数のみ―しているので、自明であることから除外して処理している。 |
< | < | ||
100 'LIST PRIME NUMBERS | 100 'LIST PRIME NUMBERS | ||
- | 110 CLS: | + | 110 CLS: |
120 I=0 | 120 I=0 | ||
130 IF I<102 W=[I] ELSE GOTO 220 | 130 IF I<102 W=[I] ELSE GOTO 220 |
エラトステネスの篩.txt · 最終更新: 2022/01/06 18:31 by araki