Prime or composite

CLS
INPUT"Enter any number";N
C=0
FOR I=1 TO N
IF N MOD I=O THEN        C=C+1
NEXT I 
IF C=2 THEN
PRINT"The given number is prime"
ELSE
PRINT"The given number is composite"
END