卡普雷卡与西西弗斯.C

传说数学家 卡普雷卡 （Kaprekar）偶然发现铁路旁的里程碑“3025”被雷击得一分为二：30与25.他敏锐地注意到：30+25=55，55^2=3025。
现称这样具有分段和平特性的整数为卡普雷卡数。

30+25=55  55*55=3025

#include<stdio.h> 
#include<math.h>
int main()
{
   int a,b,c,x,y;
  // printf("4位卡普雷卡数：");
   c=(int)sqrt(1000);c=31,列举所有超过四位数的平分两位数
   for(b=c+1;b<=99;b++)    /*枚举2位整数b*/
   {
      a=b*b;     可开方的四位数
      x=a/100;   前半段
      y=a%100;     后半段
     if(y>=10&&b==(x+y))  y>10确保两位数罢了,没有的话多一个9801
        printf("%d    ",a);
   }
   printf("\n");
}

---

6174-495黑洞，即 卡普雷卡尔（Kaprekar）常数。

任选4个不完全相同的数字（ 四个数字完全不同，如1111就不行），让 最大排列减 最小排列（例如8753-3578），不断重复这个动作，最后一定会得到相同的结果： 6174。这个“最大减最小”的动作，最多 不会超过7次

输入的四位数是：3758
第1次：8753 - 3578 = 5175
第2次：7551 - 1557 = 5994
第3次：9954 - 4599 = 5355
第4次：5553 - 3555 = 1998
第5次：9981 - 1899 = 8082
第6次：8820 - 288 = 8532
第7次：8532 - 2358 = 6174  

//三位黑洞数：495
void three_function(int num)
{
    int a,b,c,max,min,i=0;
    while(num!=495 || i==0)
    {
        a=num/100;
        b=(num%100)/10;
        c=num%10;
        if(a<b){a^=b;b^=a;a^=b;}
        if(a<c){a^=c;c^=a;a^=c;}
        if(b<c){b^=c;c^=b;b^=c;}
        max=a*100+b*10+c;
        min=c*100+b*10+a;
        num=max-min;

        printf("%d:%d - %d = %d\n",++i,max,min,num);
        if(num==0)break;
    }
}
____________________________________________________________________ATF
void four_function(int num) {
    int max, min, temp, i = 0, j;
    int a[4];
    while (num != 6174 || i == 0) {
        a[0] = num / 1000;
        a[1] = (num % 1000) / 100;
        a[2] = (num % 100) / 10;
        a[3] = num % 10;
        bubble_>>sort(a,4);
        max = a[0] * 1000 + a[1] * 100 + a[2] * 10 + a[3];
        min = a[3] * 1000 + a[2] * 100 + a[1] * 10 + a[0];
        num = max - min;
        printf("%d:%d - %d = %d\n",++i,max,min,num);
        if(num==0)break;
    }
}

---

123黑洞 即 西西弗斯串.

取任意一个数字，数出它的偶数个数、奇数个数及总的位数。例如1234567890，其偶数个数总共5个，奇数个数也为5个，数字总数为10个。按“偶―奇―总”的位序排列，得到新数为：5510。重复上述步骤，得到134；再重复，得到123。

我们可以用计算机编程测试，任意一个数按上述算法经有限次重复后都会得到123。换言之，任何数的最终结果都无法逃逸123黑洞。
 

int i = 0;

int re_num(int num) {
    int odd = 0, even = 0, new_num, origin = num;

    while (num != 0) {
        if (num & 1) 统计奇数偶数
            even++;
        else odd++;
        num = num / 10;
    }
    new_num = odd * 100 + even * 10 + (odd + even); 重构
    if (new_num != origin) 判断是否为123递归
    {
        i++;
        printf("%d:->%d\n", i, new_num);
        re_num(new_num);
    }
}

int main() {
    int n; //定义整型变量
//    printf("请输入一个自然数：");
    scanf("%d", &n);
    printf("%d\n", n);
    re_num(n);
    return 0;//函数返回值为0
}