10 DIM s(2 TO 1000)
20 MAT s=ZER
30 FOR n=2 TO 1000
40 IF s(n)=0 THEN
50 PRINT n
60 FOR k=n^2 TO 1000 STEP n
70 LET s(k)=1
80 NEXT k
90 END IF
100 NEXT n
110 END
「自然数の中から素数(その数と1以外の約数がない数)を順番にできるだけ多くの可能な数値まで効率よく求めるプログラムを作成しなさい」という問題の時、 どのようなプログラムにすれば良いでしょうか。 (10進 BASICによるJIS Full BASICを用いて)