谁会用vbscript写个求完美数的代码！
vbscript吧
全部回复
仅看楼主
level 1
菜的一B
楼主
谁会用vbscript写个求完美数的代码！看好`是vbscript不是VB！！谢谢啦！
2007年01月06日 08点01分
1
level 2
sonic_andy
For i=1 To 1000k = 0For j=1 To i-1If i Mod j = 0 Thenk = k + jEnd IfNextIf k = i Then MsgBox kNextMsgBox "运算完毕！"
2007年03月25日 13点03分
2
1
