关于vfp解决方案

2012-03-27

关于vfp谁能告诉我从1到100的中的质数相加之和的程序！[解决办法]try:aa0FOR i2 TO 100d0FOR j2 TO iIF

关于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