实验十一 文件操作程序设计实验(5)

int sort(int i)

{

int m,sum;

sum=0;

for(m=1;m<i;m++){

if(i%m==0)

sum=sum+m;

}

if(sum==i)

return 1;

else

return 0;

}

int main(int argc,char *argv[])

{

int i;

FILE *p;

if((p=fopen(argv[1],"wb"))==NULL){

printf("File open error!\n");

exit(0);

}

for(i=6;i<=10000;i++){

if(sort(i)){

fprintf(p,"%6d",i);

printf("%6d",i);

}

}

if(fclose(p)){

printf("Can not close the file!\n");

exit(0);