Programación Vfp de números primos

"Los números primos entre 3 y 100 son:"

Para i=3 a 100

x=0

para j=2 a i-1

si i/j=int(i/j)

x=1

endif

Fin

Si x=0

alltrim(str(i)) " "

endif

Fin