编写vb：“水仙花数”是指一个3位数,其各位数的立方和等于该数,如153＝1^3＋5^3＋3^3.编写程序,打印出
一定要正确的哦
打印出去100到1000之间的所有水仙花数
人气：180 ℃ 时间：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
- 编写程序:打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字立方和等于该数本身.
- 求斜率为-3,且与直线2x-y+4=0的交点,且与直线3x+y-1=0平行的直线方程
- 1.影响凸透镜焦距大小的主要因素是凸透镜的_______和凸透镜的_______.
- 刘长卿的《逢雪宿芙蓉山主人》原文是什么?
猜你喜欢
