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 given no is prime"
ELSE
PRINT " Tbe given no is composite:
END IF
END