输出1到1000内最大完数

更新时间：2018-06-24 23:28:31 269次访问

完数，一般指完全数，一个自然数如果它的所有真因子（即除了自身以外的约数）的和等于该数，那么这个数就是完全数，如:6的真因子有1 、2、3，6=1+2+3，所以6是一个完全数。

输出1000以内的所有完数的代码如下：

1. Pascal语言实现如下：

   var

     i,j,k:integer;

   begin

     for i:=1 to 1000 do

     begin

       k:=0;

       for j:=1 to i-1 do

         if i mod j=0 then inc(k,j);

       if k=i then writeln(i);

     end;

   end.

2. c语言实现如下：

   123456789101112#include<stdio.h>void main(){    int i,j,k;    for(i=1;i<=1000;i++)    {        k=0;        for(j=1;j<=i-1;j++)            if(i%j==0) k+=j;        if(k==i) printf("%d ",i);    }}

    

输出结果皆为

6

28

496