高一信息科技编程题
问题描述：
高一信息科技编程题
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的所有数之和 这个程序出了什么问题 求教
答
Next x
End If
上面这两句顺序写反了,应该是先结束if,x再递增
即换成
End If
Next x