C趣味程序(二)(12)求n環(huán)相親數(shù)鏈

2.6.2 求n環(huán)相親數(shù)鏈
     1.算法分析
     在相親數(shù)的基礎上，根據(jù)指定的n求n環(huán)相親數(shù)鏈，設置數(shù)組s:s(0)即為循環(huán)中選取的整數(shù)i(預置范圍是11~2000000)，其真因數(shù)之和存儲到s(1)。一般地，通過k循環(huán)實現(xiàn)把s(i-1)的真因數(shù)之和存儲到 s(i)(k:1-n)。
     判別：若s(n)<>s(0)，則測試下一個i，直至s(n)==s(0)時，找到相親數(shù)鏈的n個環(huán)數(shù)。按規(guī)格作打印輸出。
    程序代碼如下：
    /*求n環(huán)相親數(shù)鏈*/
    程序運行結(jié)果如下：
    #include
    #include
    void main()
    {
     int c,k,n;
     long i,j,t,s[100];
     printf("\n 尋求n環(huán)相親數(shù)鏈。請輸入n: ");
     scanf("%d",&n);
     for(i=11;i<=2000000;i++)
     {
     s[0]=i;
     for(c=0,k=1;k<=n;k++)
     {
     s[k]=1;t=sqrt(s[k-1]);
     for(j=2;j<=t;j++) if(s[k-1]%j==0) s[k]=s[k]+j+s[k-1]/j;
     if(s[k-1]==t*t)s[k]-=t;
     for(j=0;j<=k-1;j++) if(s[k]==s[j]){c=1;break;}
     if(c==1) break;}
     if(s[0]==s[n])
     {
     printf("\n %d 環(huán)相親數(shù)鏈:\n",n);
     for(k=0;k<=n-1;k++)
     {
     printf("\n%ld: %d",s[k],1);
     for(j=2;j<=s[k]/2;j++)
     if(s[k]%j==0)printf("+%d",j);
     printf("=%ld",s[k+1]);}
     break;}
     }
     printf("\n");
    }