大家好,小乐来为大家解答以上的问题。vb水仙花数代码,水仙花数vb代码这个很多人还不知道,现在让我们一起来看看吧!
1、这个是打印所有三位数的水仙花数的代码:Private Sub Command1_Click()For a = 1 To 9 For b = 0 To 9 For c = 0 To 9 If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Then print a * 100 + b * 10 + c End If Next Next NextEnd Sub。
本文到此分享完毕,希望对大家有所帮助。
版权声明:本站所有资料均为网友推荐收集整理而来,仅供学习和研究交流使用。
工作时间:8:00-18:00
客服电话
电子邮件
扫码二维码
获取最新动态