神马品牌网钢铁侠和超人谁厉害:求1000以内的完数..用VF编出来帮帮我啦....
来源：百度文库 编辑：神马品牌网 时间：2024/05/04 17:00:19
所谓完数:比如6=1+2+3=1*2*3
我是第一个，谢谢，请给我，真诚的希望你成为编程高手!!<br>
set talk off
for i=1 to 1000
for j=1 to i
if mod(i,j)=0
c=j*j
d=j+j
end if
end for
if c==d
?i
end if
end for
set talk on
retrun
很简单的问题
你自己解决就好了
只要你会用fortran，就应该没问题