您现在的位置是:首页 > 护肤美妆 >正文

vb编一个程序显示出所有的水仙花数(vb水仙花数编程)

发布时间:2022-08-03 10:25:22终秀卿来源:

导读您好,蔡蔡就为大家解答关于vb编一个程序显示出所有的水仙花数,vb水仙花数编程相信很多小伙伴还不知道,现在让我们一起来看看吧!1、Option...

您好,蔡蔡就为大家解答关于vb编一个程序显示出所有的水仙花数,vb水仙花数编程相信很多小伙伴还不知道,现在让我们一起来看看吧!

1、Option ExplicitPrivate Sub Form_Click() Dim i As Integer, ge As Integer, shi As Integer, bai As Integer For i = 100 To 999 bai = Int(i / 100) shi = Int((i - bai * 100) / 10) ge = i - bai * 100 - shi * 10 If i = bai ^ 3 + shi ^ 3 + ge ^ 3 Then Print i End If Next iEnd Sub。

本文就讲到这里,希望大家会喜欢。

标签:

上一篇
下一篇