vf语言里水仙花数怎么输出?
Private Sub Form1_Click() Dim a As Integer, b As Integer, c As Integer For a = 1 To 9 For b = 0 To 9 For c = 0 To 9 If a ^ 3 + b ^ 3 + c ^ 3 = a * 100 + b * 10 + c Then Form1.Print a * 100 + b * 10 + c End If Next c Next b Next a End
Copyright © 广州京杭网络科技有限公司 2005-2024 版权所有 粤ICP备16019765号
广州京杭网络科技有限公司 版权所有