100  DEF  FN MOD(NUM) = NUM -  INT (NUM / DIV) * DIV: REM NUM MOD DIV
 110  FOR I = 1 TO 99
 120      V = I: GOSUB 200"ISPRIME
 130      IF ISPRIME THEN  PRINT " "I;
 140  NEXT I
 150  END

 200  ISPRIME = FALSE: IF V < 2 THEN  RETURN
 210  DIV = 2:ISPRIME =  FN MOD(V): IF  NOT ISPRIME THEN ISPRIME = V = 2: RETURN
 220  LIMIT =  SQR (V): IF LIMIT >  = 3 THEN  FOR DIV = 3 TO LIMIT STEP 2:ISPRIME =  FN MOD(V): IF ISPRIME THEN  NEXT DIV
 230  RETURN