jsbasic/samples/sample.primecheck.txt
2020-02-09 21:02:04 -08:00

10 lines
333 B
Plaintext

990 print "ENTER A NUMBER AND SEE IF IT'S PRIME"
1000 input n
1002 if n<>int(n) then print "ENTER AN INTEGER":GOTO 1000
1004 if n<2 then print "ENTER AN INTEGER GREATER THAN 1":GOTO 1000
1010 for d=2 to n-1
1020 if n/d = int(n/d) then print "NOT PRIME; MULTIPLE OF "; d:GOTO 1000
1030 next d
1040 print n; " IS PRIME"
1050 goto 1000