题目
高一信息科技编程题
Dim x As Double
Dim s As Double
s = 0
For x = 100 To 999
If x Mod 10 + Int(x / 100) + Int(x / 10) Mod 10 = 17 Then
s = s + x
Next x
End If
Print s
End Sub
求3位数的3个数字相加之和等于17的所有数之和 这个程序出了什么问题 求教
Dim x As Double
Dim s As Double
s = 0
For x = 100 To 999
If x Mod 10 + Int(x / 100) + Int(x / 10) Mod 10 = 17 Then
s = s + x
Next x
End If
Print s
End Sub
求3位数的3个数字相加之和等于17的所有数之和 这个程序出了什么问题 求教
提问时间：2021-03-21
答案
Next x
End If
上面这两句顺序写反了,应该是先结束if,x再递增
即换成
End If
Next x
End If
上面这两句顺序写反了,应该是先结束if,x再递增
即换成
End If
Next x
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点