主题:帮我看看这题怎么做啊?
选出能被7整除且至少有一位数字是6的三位数,打印出这样的数及它们的和,并统计其有几个这样的数。
我编的程序是
cls
for i= 100 to 999
a=int(i/100)
b=int(i-a*100)/10
c=int(i-a*100-b-10)
if i mod 7 =0 and (a=6 or b=6 or c=6) then n=n+1:print i :s=s+i
next i
print n,s
end
我这个程序是错 的但不知道错在哪里?
我编的程序是
cls
for i= 100 to 999
a=int(i/100)
b=int(i-a*100)/10
c=int(i-a*100-b-10)
if i mod 7 =0 and (a=6 or b=6 or c=6) then n=n+1:print i :s=s+i
next i
print n,s
end
我这个程序是错 的但不知道错在哪里?