2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*73机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/03 12:46:12
![2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*73机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过](/uploads/image/z/9308931-51-1.jpg?t=2%E6%B1%82%E5%87%BA%E6%89%80%E6%9C%89%E7%9A%84%E6%B0%B4%E4%BB%99%E8%8A%B1%E6%95%B0.%E6%B0%B4%E4%BB%99%E8%8A%B1%E6%95%B0%E6%98%AF%E6%8C%873%E4%BD%8D%E7%9A%84%E6%AD%A3%E6%95%B4%E6%95%B0%2C%E5%85%B6%E5%90%84%E4%BD%8D%E6%95%B0%E5%AD%97%E7%9A%84%E7%AB%8B%E6%96%B9%E5%92%8C%E7%AD%89%E4%BA%8E%E8%AF%A5%E6%AD%A3%E6%95%B4%E6%95%B0%E6%9C%AC%E8%BA%AB.%E4%BE%8B%E5%A6%82%2C407%3D4%2A4%2A4%2B0%2A0%2A0%2B7%2A7%2A73%E6%9C%BA%E7%A5%A8%E4%BC%98%E6%83%A0%2C%E6%9F%90%E8%88%AA%E7%A9%BA%E5%85%AC%E5%8F%B8%E8%A7%84%E5%AE%9A%E5%9C%A87-9%E6%9C%88%E4%BB%BD%2C%E5%A6%82%E6%9E%9C%E8%AE%A2%E7%A5%A8%E6%95%B0%E8%B6%85%E8%BF%8720%E5%BC%A0%2C%E5%88%99%E7%A5%A8%E4%BB%B7%E4%BC%98%E6%83%A015%25%3B%E5%A6%82%E6%9E%9C%E8%B6%85%E8%BF%87)
2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*73机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过
2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*7
3机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过10张,则票价优惠5%;在1-5月份,10月和11月份,如果订票数超过20张,则票价优惠25%;如果超过10张,则票价优惠15%.设计程序,可以输入票价,月份和订票数,并显示出所需要的金额.
2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*73机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过
2求出所有的水仙花数.水仙花数是指3位的正整数,其各位数字的立方和等于该正整数本身.例如,407=4*4*4+0*0*0+7*7*7
在窗体上画2个Command控件,和3个 text控件 双击打开代码窗口,复制下面:
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As Integer
For a = 1 To 9
For b = 0 To 9
For c = 0 To 9
If (a * a * a + b * b * b + c * c * c) = (a * 100 + b * 10 + c) Then Print a * 100 + b * 10 + c
Next c
Next b
Next a
End Sub
3机票优惠,某航空公司规定在7-9月份,如果订票数超过20张,则票价优惠15%;如果超过10张,则票价优惠5%;在1-5月份,10月和11月份, 如果订票数超过20张,则票价优惠25%;如果超过10张,则票价优惠15%.设计程序,可以输入票价,月份和订票数,并显示出所需要的金额.
Private Sub Command2_Click()
'text1 是月份
'text2 是数量
'text3 是票价
if text1.text >6 and text1.text < 10 then
if text2.text >19 then msgbox "您的票价是:" & text3.text * 0.85 * text2.text & "元"
if text2.text >9 and text2.text0 and text1.text 19 then msgbox "您的票价是:" & text3.text * 0.75 * text2.text & "元"
if text2.text >9 and text2.text