sukettchiさんのプロフィール
- 質問数
- 12
- 回答数
- 0
- ベストアンサー数
- 0
- 自己紹介
- cobol言語のスクールにかよっていますがわからないのでおしえてください。
素数判定プログラムなのですが
途中から
PERFOM KEISAN UNTIL OWARI = "N".
DISPLAY SPACE.
STOP RUN.
KEISAN.
MOVE SPACE TO H-ATAI.
ACCEPT H-ATAI AT 0436.
MOVE H-ATAI TO ATAI.
PERFORM KEISAN2 VARYING N
FROM 2 BY 1 UNTIL N > ATAI - 1.
<==ここに1回でも割り切れたとき
DISPLAY KOTAE AT 0535. 判定する言語をおしえて
ACCEPT OWARI AT 1045. この文だと全部「素数」と、
KEISAN2. 出てしまうのですが。
DIVIDE ATAI BY N GIVING HENSU REMAINDER AMARI.
IF AMARI = 0
MOVE "素数ではありません" TO KOTAE
ELSE
MOVE "素数です"TO KOTAT.
お願いします。
最新の回答
- 投稿はありません。
