Permalink
Cannot retrieve contributors at this time
Join GitHub today
GitHub is home to over 28 million developers working together to host and review code, manage projects, and build software together.
Sign up
Fetching contributors…
Cannot retrieve contributors at this time
| 100 PRINT"INTERFACE AGE"; | |
| 101 PRINT" PRIME-NUMBER"; | |
| 102 PRINT" BENCHMARK"; | |
| 103 PRINT" PROGRAM" | |
| 104 PRINT"For Gigatron"; | |
| 105 PRINT" TinyBASIC v2" | |
| 110 FOR N=1 TO 200 | |
| 120 FOR K=2 TO 100 | |
| 130 M=N%K | |
| 140 L=N/K | |
| 150 IF L=0 GOTO 200 | |
| 160 IF L=1 GOTO 190 | |
| 170 IF M>0 GOTO 190 | |
| 180 IF M=0 GOTO 210 | |
| 190 NEXT K | |
| 200 PRINT N | |
| 210 NEXT N | |
| 220 PRINT | |
| 230 PRINT | |
| 240 PRINT "DONE" | |
| 250 END |