_runtimePath_ "../runtime"
_codeRomType_ ROMv1

cls

100 PRINT "INTERFACE AGE";
101 PRINT " PRIME-NUMBER";
102 PRINT " BENCHMARK";
103 PRINT " PROGRAM"
104 PRINT "For Gigatron";
105 PRINT " gtBASIC "
110 FOR N=1 TO 200
120 FOR K=2 TO 100
130 M=N % K
140 L=N / K
150 IF L&&=0 THEN GOTO 200
160 IF L&&=1 THEN GOTO 190
170 IF M&&>0 THEN GOTO 190
180 IF M&=0 THEN GOTO 210
190 NEXT K
200 PRINT N
210 NEXT N
220 PRINT
230 PRINT
240 PRINT "DONE"
250 END