自己紹介

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.

お願いします。