素数か合成数か判定するプログラムできたの～! 何かアドバイスあったら教えてくださ～い(´∀`)/

2,3,5,7それぞれでわってどれかで余りが0になったら合成数という判断の方法もあります。

CLS INPUT　P IF　(P　MOD　2)==0　THEN　GOTO　@NOT_P IF　(P　MOD　3)==0　THEN　GOTO　@NOT_P IF　(P　MOD　5)==0　THEN　GOTO　@NOT_P IF　(P　MOD　7)==0　THEN　GOTO　@NOT_P ?　P;"は素数" WAIT　150 END @NOT_P ?　P;"は合成数" WAIT　150 END とか･･･?

間違っていたらすみません。

あれ？でも、それだと100以下の自然数しか出来なかった気ｶﾞｽ

ループは、Pの平方根まで調べれば 充分だと思います。

10行目でx=1を代入したらそのままbreakで抜ければ判定勝ちスピードが上がりますね。 ゆっきさんの方法は11が合成数になってしまうので2,3,5,7だけに絞るのはまずいかなと思います。

1は合成数ってことでおkかな…(心の声)

±1は単数です。

すいません。 あの方法だと121が素数だという判断になってしまいますね･･･

なるほど参考にさせていただきます！ 皆さん凄いな…