How do you find prime no in gwbasic program?

10 input "enter a no."; n

20 for i = 1 to n

30 if n mod i = 0 then c = c +1

40 next i

50 if c = 2 then print "Prime number" else print "not a prime number"

60 end