x=1
do while x<=1000
i=1
s=0
do while i
s=s+i
endif
i=i+1
enddo
if s=x
?x
endif
x=x+1
enddo
什么是完数？用VF 求1000 以内完数，怎么回事？
答案:2 悬赏:70 手机版
解决时间 2021-01-30 04:50
- 提问者网友：皆是孤独
- 2021-01-29 22:00
以下是程序。
x=1
do while x<=1000
i=1
s=0
do while i if x%i=0
s=s+i
endif
i=i+1
enddo
if s=x
?x
endif
x=x+1
enddo
x=1
do while x<=1000
i=1
s=0
do while i
s=s+i
endif
i=i+1
enddo
if s=x
?x
endif
x=x+1
enddo
最佳答案
- 五星知识达人网友：酒安江南
- 2021-01-29 23:37
一个数如果恰好等于它的因子之和，这个数就称为是“完数”。例如 ：数字6，它的因子为1、2、3，而6=1+2+3，因此，6是“完数”。
全部回答
- 1楼网友：夜风逐马
- 2021-01-29 23:50
很简单的问题 你础讥壁客撰九辩循菠末自己解决就好了 只要你会用fortran，就应该没问题
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯