Primality by trial division: Difference between revisions

Content added Content deleted
Line 426: Line 426:
==={{header|IS-BASIC}}===
==={{header|IS-BASIC}}===
<lang IS-BASIC>100 PROGRAM "Prime.bas"
<lang IS-BASIC>100 PROGRAM "Prime.bas"
110 FOR X=1 TO 1000
110 FOR X=1 TO 100
120 IF PRIME(X) THEN PRINT X;
120 IF PRIME(X) THEN PRINT X;
130 NEXT
130 NEXT