关于vfp
谁能告诉我从1到100的中的质数相加之和的程序!
[解决办法]
try:
aa=0
FOR i=2 TO 100
d=0
FOR j=2 TO i
IF i/j=INT(i/j) AND i<>j
d=1
EXIT
ENDIF
NEXT
IF d=1
aa=aa+i
endif
NEXT
?aa
发布时间: 2012-03-27 13:44:24 作者: rapoo
关于vfp
谁能告诉我从1到100的中的质数相加之和的程序!
[解决办法]
try:
aa=0
FOR i=2 TO 100
d=0
FOR j=2 TO i
IF i/j=INT(i/j) AND i<>j
d=1
EXIT
ENDIF
NEXT
IF d=1
aa=aa+i
endif
NEXT
?aa