输入一个数判断其是否为素数？？
好像哪编错了？？？？

clear
input"请输入n;" to n
      
   for j=2 to n-1
      f=.t.  
     if n%j=0
     f=.f.
   exit
      endif
   endfor
   if f=.t.
   ?"shishushu"
   else
   ?"bushishushu"
   endif
cance

input'输入数值判断是否为素数，请输入大于2的数字：' to SuShuFT

SuShuFT1=.T.
for aa=2 to SuShuFt-1
    if mod(SuShuFT,aa)=0
       SuShuFT1=.F.
       exit
    endif
endfor

if SuShuFT1
   ?'该数【',SuShuFT,'】是素数.'
else
   ?'该数【',SuShuFT,'】不是素数，他能被【',aa,'】整除.'
endif

厉害！！！