WAP to find Prime Numbers from 1 to 100.

Question:
Write a program to find prime numbers from 1 to 100.

Ans:
            CLS
            FOR j = 2 TO 100
            FOR k = 2 TO j – 1
            IF j MOD k = 0 THEN GOTO last
            NEXT k
            PRINT j;
            last:
            NEXT j
            END

Ans in Image: