永发信息网

下面这个题的VB编程怎么写啊“完全数是指一个数恰好等于它的因子之和.例如6=1+2+3,因而6是完全数,编制

答案:1  悬赏:50  手机版
解决时间 2021-05-25 19:10
下面这个题的VB编程怎么写啊“完全数是指一个数恰好等于它的因子之和.例如6=1+2+3,因而6是完全数,编制
最佳答案

你的问题不全,下面程序找的是1000以内的完全数.
Private Sub Command1_Click()
Dim i As Integer, s As Integer
For i = 2 To 1000
s = 0
For j = 1 To i - 1
If i Mod j = 0 Then s = s + j
Next
If s = i Then Print i,
Next
End Su
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
会同县怀化皇茶我想知道这个在什么地方
求天津市网通IP代理(可用的)
道里区哈尔滨埃德蒙顿路72号门市在什么地方啊
怎样在电脑上下载哥曲?
李嘉诚办公室名言,李嘉诚名言世界本来就是充
常州市鼎能太阳热水器厂我想知道这个在什么地
红安县黄冈中国福利彩票哪位知道具体地址啊
我的QQ怎么办呀?
百合喜阳还是喜阴,为人类做出巨大贡献的植物
民权县商丘中国福利彩票我想知道这个在什么地
中国传媒大学河北省文科历年升学率
3g能改头像吗
红安县黄冈阿凡卓专卖店怎么去啊,谁知道地址
鄂尔多斯函授站棋盘井招生点地址有知道的么?
团风县黄冈上海浪潮美发沙龙在什么地方啊,我
推荐资讯
瘦的怎么拼?(是英语单词)
htc g11手机 有双核的机器 是什么意思? 解释
两个正电荷A B的电荷量都是3C 静止于真空中,
龙之谷ms转什么好
大人为什么打小孩
如果不想吃梨那用什么来代替?
中石油为什么比中石化的股价高!!
怎样才可以很快适应新学校?
录取情况为什么会这样?
夜里睡觉梦见我自己很伤心的哭意为着什么
喝白酒时 喝点什么解酒呢?能让自己多喝点酒
衣服买什么牌子的好
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?