作业帮 > 综合 > 作业

求能被6整除且只有一位数字为8的三位数的和?VFP编程,

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/31 17:12:25
求能被6整除且只有一位数字为8的三位数的和?VFP编程,
考试应急~求大神编写通俗易懂些的语言~只要能求出结果.
额.3Q
求能被6整除且只有一位数字为8的三位数的和?VFP编程,
s=0
for i=100 to 999
if mod(i,6)=0
bai=int(i/100)
shi=int(mod(i,100)/10)
ge=mod(i,10)
if bai=8 and shi8 and ge8
s=s+i
endif
if bai8 and shi=8 and ge8
s=s+i
endif
if bai8 and shi8 and ge=8
s=s+i
endif
endif
endfor
?"和为",s

或者
s=0
for i=100 to 999
if mod(i,6)=0
bai=int(i/100)
shi=int(mod(i,100)/10)
ge=mod(i,10)
if (bai=8 and shi8 and ge8) or (bai8 and shi=8 and ge8) or (bai8 and shi8 and ge=8)
s=s+i
endif
endif
endfor
?"和为",s

*mod(i,6)=0表示i能被6整除
*bai=int(i/100)表示求百位数
*shi=int(mod(i,100)/10)表示求十位数
*ge=mod(i,10)表示求个位数
*bai=8 and shi8 and ge8表示百位为8,十位、个位不为8
*bai8 and shi=8 and ge8表示十位为8,百位、个位不为8
*bai8 and shi8 and ge=8表示个位为8,百位、十位不为8
*结果是28782