回 帖 发 新 帖 刷新版面

主题:帮我看看这题怎么做啊?

选出能被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
我这个程序是错 的但不知道错在哪里?

回复列表 (共1个回复)

沙发

c=int(i-a*100-b-10)
                \
                 \_ 这个应该是*号吧

我来回复

您尚未登录,请登录后再回复。点此登录或注册