83.卡布列克常数
验证卡布列克运算。任意一个四位数，只要它们各个位上的数字是不全相同的，就有这样的规律：
1)将组成该四位数的四个数字由大到小排列，形成由这四个数字构成的的四位数；
2)将组成该四位数的四个数字由小到大排列，形成由这四个数字构成的最小的四位数(如果四个数中含有0，则得到的数不足四位)；
3)求两个数的差，得到一个新的四位数(高位零保留)。
重复以上过程，最后得到的结果是6174，这个数被称为卡布列克数。
*问题分析与算法设计
题目中给出的处理过程很清楚，算法不需要特殊设计，可按照题目的叙述直接进行验证。
*程序与程序注释
#includevoid vr6174(int);
void parse_sort(int num,int *each);
void max_min(int *each,int *max,int *min);
void parse_sort(int num,int *each);
int count=0;
void main()
{
int n;
printf("Enter a number:");
scanf("%d", &n); /*输入任意正整数*/
vr6174(n); /*调用函数进行验证*/
}
void vr6174(int num)
{
int each[4],max,min;
if(num!=6174&&num) /*若不等于74且不等于0则进行卡布列克运算*/
{
parse_sort(num,each); /*将整数分解，数字存入each数组中*/
max_min(each,&max,&min); /*求数字组成的值和最小值*/
num=max-min; /*求值和最小值的差*/
printf("[%d]: %d-%d=%d\n",++count,max,min,num); /*输出该步计算过程*/
vr6174(num); /*递归调用自身继续进行卡布列克运算*/
}
}
void parse_sort(int num,int *each)
{
int i,*j,*k,temp;
for(i=0;i<=4;i++) /*将NUM分解为数字*/
{
j=each+3-i;
*j=num%10;
num/=10;
}
for(i=0;i<3;i++) /*对各保数字从小到大进行排序*/
for(j=each,k=each+1;jif(*j>*k) { temp=*j;*j=*k;*k=temp;}
return;
}
void max_min(int *each,int *max,int *min) /*将分解的数字还原为整数和最小整数*/
{
int *i;
*min=0;
for(i=each;i*min=*min*10+*i;
*max=0;
for(i=each+3;i>=each;i--) /*还原为的整数*/
*max=*max*10+*i;
return;
}
*运行结果
1) Enter a number:4312
[1]:4312-1234=3078
[2]:8730-378=8352
[3]:8532-2358=6174
C趣味程序百例(26)卡布列克常数.doc
下载Word文档到电脑，方便收藏和打印[全文共1185字]
编辑推荐：
下载Word文档
如果觉得《C语言编程验证卡布列克 C趣味程序百例(26)卡布列克常数》对你有帮助，请点赞、收藏，并留下你的观点哦！
