用Vfp, 编写一个程序,输入一个数,求出小于等于这个数的所有素数

2025-03-09 22:08:30
推荐回答(1个)
回答1:

 
 num=INPUTBOX("输入一个数","Input ",100)
         
 for m=3 to num step2    &&在3到num之间的所有奇数中找素数,因为偶数一定不是素数。
         n=int(num-1))    
         for i =2  to n   
         
          if mod (m,i)=0  &&如果m被i整除了,
               exit
          endif
   endfor
    if i>n 
    ??m
    endif
 endfor