编写vb：“水仙花数”是指一个3位数,其各位数的立方和等于该数,如153＝1^3＋5^3＋3^3.编写程序,打印出
一定要正确的哦
打印出去100到1000之间的所有水仙花数
人气：184 ℃ 时间：2019-08-19 13:59:39
解答
Private Sub Command1_Click()
For i = 100 To 1000
g = Mid(i,1,1)
s = Mid(i,2,1)
b = Mid(i,3,1)
If i = g * g * g + s * s * s + b * b * b Then
Print i
End If
Next i
End Sub
153
370
371
407
就这四个
推荐
- vfp编程题：求水仙花数,即一个三位数,去各位上的数字的立方和等于其本身.如153=1^3+5^3+3^3
- (1/2)VB编程,如果一个三位整数等于其各位数字的立方和,则称这个数为水仙花数,如153=1^3+5...
- 打印出所有的“水仙花数”,所谓“水仙花数”是指一个3位数,其各位数字立方和等于该数本身.例如153是一
- 输出所有的水仙花数,水仙花数就是指一个三位数,其各位数字立方和等于该数本身.如153=1*1*1+5*5*5+3*3*3
- 编写程序:打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字立方和等于该数本身.
- 关于坚持不懈的名言!
- 一个三角形和一个平行四边形等底,而三角形的高是平行四边形高的1/2,那么三角形的面积相当于平行四边形面
- 东野毕之马失中定公的感情变化
猜你喜欢
