标题:关于这个问题...
取消只看楼主
lcnhyf1986
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2007-3-16
 问题点数:0 回复次数:0 
关于这个问题...

For i = m To n
sum = 0
For j = 1 To i / 2
If i Mod j = 0 Then
sum = sum + j
End If
Next j
If sum = i Then
Print i
End If

Next i

'求m 到n 之间的完全数

其中 把 i/2 改为 i 结果就不能显示,请问是为什么呢??

2007-04-10 20:41



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-130846-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.175797 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved