● prime or composite.

=> CLS
INPUT "Enter any number"; N
C=0
For I = 1 To N
IF N MOD I = 0 THEN C= C+1
NEXT I
IF C=2  THEN
PRINT " The number is prime"
ELSE
PRINT " The number is composite"
END IF
END