求大神写一个关于素数问题的程序
vfp吧
全部回复
仅看楼主
level 1
冷笑颜521 楼主
问题是这样的:将100~500间的素数依次追加到表new.dbf的“素数”字段中。
谢谢啦!!
2015年01月06日 07点01分 1
level 10
CLEAR
LCSTR=[2,3,5,7,]
NUM=4
FOR I=3 TO 500 STEP 2
IF MOD(I,2)!=0 AND MOD(I,3)!=0 AND MOD(I,5)!=0 AND MOD(I,7)!=0
LCSTR=LCSTR+TRANSFORM(I)+[,]
NUM=NUM+1
ENDIF
ENDFOR
?[共有质数:]+TRANSFORM(NUM)+[ 个 ]+'【'+LEFT(LCSTR,LEN(LCSTR)-1)+'】'
2015年01月06日 12点01分 2
这个完全不对阿[冷]
2015年01月07日 17点01分
1