匿名用户

1级

2011-05-20 回答

老实说,我不懂什么是完数,但如果28算是完数的话,那我写的这段代码就可以用。

从1循环到10000,返回

6=1+2+3

6是完数

28=1+2+14+4+7

28是完数

496=1+2+248+4+124+8+62+16+31

496是完数

8128=1+2+4064+4+2032+8+1016+16+508+32+254+64+127

8128是完数

我是Text1 Text2 来输入输出的,你自己按你要求改下吧。

Private Sub Command3_Click()

Dim a, b, x, y, z As Double, m, n, ss As String

a = Text1.Text

b = 0: m = "1": z = 1

For x = 2 To a - 1

If a Mod x = 0 And a <> x Then

b = 1: y = a / x

If y > x Then n = x & "+" & y Else n = y & "+" & x '待判断是否重复后写入

If InStr(m & "+", "+" & n & "+") = 0 Then

m = m & "+" & n: z = z + x + y

End If

End If

Next

If a = 1 Then

ss = ss & "1不是素数也不是合数" & vbCrLf

ElseIf b = 1 Then

If a = z Then

ss = ss & a & "=" & m & vbCrLf

ss = ss & a & "是完数" & vbCrLf

Else

ss = ss & a & "不是完数" & vbCrLf

End If

Else

ss = ss & a & "是素数" & vbCrLf

End If

Text2.Text = ss

End Sub

追问:

你的QQ多少,能交流一下吗

matlab判断m是否为完数,编写一个函数过程:判断一个已知数m是否是完数(完数就是指该数本身等于它各个因子之和,如6=1+2+3,6就是...相关推荐

  1. 编写一个判断完数的函数。完数是指一个数恰好等于它的因子之和,如6=1+2+3,6就是完数。

    编写一个判断完数的函数.完数是指一个数恰好等于它的因子之和,如6=1+2+3,6就是完数. 程序之美 编写一个判断完数的函数.完数是指一个数恰好等于它的因子之和,如6=1+2+3,6就是完数. #in ...

  2. 2021-04-09编程求1000以内的所有“完数”。所谓“完数”是指一个数恰好等于它的因子之和。例如,6是完数,因为6=1+2+3

    编程求1000以内的所有"完数".所谓"完数"是指一个数恰好等于它的因子之和.例如,6是完数,因为6=1+2+3 #include"stdio.h&q ...

  3. 编程求1000之内的所有“完数”。所谓“完数”是指一个数恰好等于它的因子之和。例如,6是完数,因为6=1+2+3。

    #include<iostream> #include<iomanip> using namespace std; int main() {int n,sum=0;for(n= ...

  4. 【C语言】创建一个函数,判断某一正整数是否为完数,并调用这个函数找出1000以内所有完数...

    什么是完数? 如果一个数等于它的因子之和,则称该数为"完数"(或"完全数"). 例如,6的因子为1.2.3,而 6=1+2+3,因此6是"完数&quo ...

  5. ACMNO.11 一个数如果恰好等于它的因子之和,这个数就称为“完数“。 例如,6的因子为1、2、3,而6=1+2+3,因此6是“完数“。 编程序找出N之内的所有完数,并按下面格式输出其因子

    写在前面,心得感悟~ 代码越来越有难度! 这个ACM题,我调试了 将近50次~ 一个小时! 真的是,年纪轻轻的搞什么ACM呀! 关于题的解决思路放在下面再写吧! 题目描述 一个数如果恰好等于它的因子之 ...

  6. 一个数如果恰好等于它的因子之和,这个数就称为 完数 。例如6=1+2+3.编程 找出1000以内的所有完数。

    一个数如果恰好等于它的因子之和,这个数就称为 "完数 ".例如6=1+2+3.编程 找出1000以内的所有完数. 思路:首先求出一个数的所有因子 在判断这个数的所有因子之和与它本身 ...

  7. 一个数如果恰好等于它的因子之和,这个数就称为完数。例如,6的因子为1,2,3,且6=1+2+3,因此6是完数。

    描述 一个数如果恰好等于它的因子之和,这个数就称为完数.例如,6的因子为1,2,3,且6=1+2+3,因此6是完数. 输入 一个正整数n 输出 判断n是否为完数.如果是,则输出Yes和它的所有因子:否 ...

  8. C语言学习之一个数如果恰好等于它的因子之和,这个数就称为“完数”。例如,6的因子为1,2,3,而6=1+2+3,因此6是“完数”。编程序找出1000之内的所有完数。

    一个数如果恰好等于它的因子之和,这个数就称为"完数".例如:6的因子为1,2,3,而6=1+2+3,因此6是"完数".编程序找出1000之内的所有完数,并按下面 ...

  9. python实现一个数如果恰好等于它的因子之和,这个数就称为“完数” 。例如, 6的因子为 1、2、3,而 6=1+2+3,因此 6 是完数。编程找出1000之内的所有完数

    一个数如果恰好等于它的因子之和,这个数就称为"完数" . 例如, 6 的因子为 1.2.3,同时6=1+2+3,因此 6 是完数. 编程找出 1000 之内的所有完数,并输出该完数 ...

最新文章

  1. 双线路切换-冗余备份实验
  2. ceph 集群 健康状态 监管
  3. 生成SLUTION MANAGER KEY 的ABAP程序
  4. android listview 列加id,Android实战开发之ListView同一个item显示2列的实现方法
  5. 牛客 - 牛牛的Link Power II(线段树)
  6. brew 安装mysql5.6_MacOS 10.14安装和brew更新后无法安装mysql gem
  7. SAP License:SAP资产管理模块中的相关业务处理
  8. BT.601与BT.656
  9. matlab:xlsread
  10. vue+lodop打印快递面单
  11. Python2.爬虫--单词查询程序
  12. 7.0高等数学五-高斯公式
  13. 前端绝对路径不显示图片_img标签使用绝对路径无法显示图片
  14. 【电脑使用】硬盘无法引导进入系统,无法退出BIOS
  15. 深入理解String.intern
  16. js中splice方法和slice方法
  17. HTMLCSS超文本标记语言编程
  18. Pycharm无法编辑问题
  19. DSP关键字cregister (关于IER,IFR找不到定义)
  20. 深圳Python学习:Python几大问,你想知道的答案都在这里!-千锋

热门文章

  1. vsomeip第一课: vsomeip的安装和demo演示
  2. 2016年中国电信业发展趋势:管道价值回归与重塑
  3. 遗传算法创建初始种群
  4. 记录一次json_decode 返回NULL解决过程
  5. Python获取PC版微信安装路径
  6. 发那科机器人六轴放大器保险丝熔断_发那科机器人R-30iB控制柜保险丝解析——发那科机器人...
  7. 基于liosam先验地图与NDT配准的全局重定位的一些个人理解
  8. klai安装vmware tools
  9. 图片管够!用Python做了个图片识别系统(附源码)
  10. cad无法安装_CAD软件下载好了,为什么安装不上?别急!试试这两个方法!