VF 编程求解10~1000之间能被7整除但不能被3整除的数据和,要过程和结果,谢谢!

clear
s=0
for i=10 to 1000
if mod(i,7)=0 and mod(i,3)0
s=s+i
endif
endfor
"10~1000之间能被7整除但不能被3整除的数据和是：",s
return
结果是47376