10 REM 1000以下の素数を表示
20 FOR N=1 TO 1000
30 L=INT(SQR(N+.5))
40 A=2
50 IF A>L THEN 90
60 IF N-INT(N/A)*A=0 THEN 90
70 A=A+1
80 GOTO 50
90 PRINT N:NEXT N
100 END

1〜1000のすべての整数が表示されます・・・。
どこが違うんですか?