Question: Write a program to find prime numbers from 1 to 100.
Answer:
CLS
FOR j = 2 TO 100
FOR k = 2 TO j-1
IF j MOD k = 0 THEN TOTO last
NEXT k
PRINT j;
last;
NEXT j
END
FOR j = 2 TO 100
FOR k = 2 TO j-1
IF j MOD k = 0 THEN TOTO last
NEXT k
PRINT j;
last;
NEXT j
END