用VFP 计算10000以内所有十位数为六,且该数能被七整除的数之和.求救高手

来源:学生作业学帮网 编辑:学帮网 时间:2024/07/04 11:36:17

用VFP 计算10000以内所有十位数为六,且该数能被七整除的数之和.求救高手

set talk off
clear
s=0
for i=1 to 100000
if int(i/10)%10=6 and i%7=0
s=s+i
endif
endfor
?s
set talk on