标题:卡布列克常数(6174问题)问题求解
只看楼主
tompobing
Rank: 8Rank: 8
等 级:蝙蝠侠
帖 子:260
专家分:809
注 册:2012-12-9
结帖率:78.13%
已结贴  问题点数:25 回复次数:2 
卡布列克常数(6174问题)问题求解
想了下面这个方法解卡布列克常数,程序编译无错,运行有问题
#include <stdio.h>
void max_min(int* arr,int *max,int *min)
{
   int *p,*q;
   for(p=arr;p<arr+4;p++)
       *min=*min*10+*p;
   for(q=arr+3;q>=arr;q++)
       *max=*max*10+*q;
}
void cut(int *arr,int num)
{
    int i,temp;
    int *p,*q;
    for(i=0;i<4;++i)
    {
        arr[i]=num%10;
        num/=10;
    }
    for(i=0;i<4;++i)
     for(p=arr,q=arr+1;p<arr+3-i;p++,q++)
        if(*p>*q)
        {
            temp=*p;
            *p=*q;
            *q=temp;
        }
}

void middle(int num)
{
    int array[4];
    int max=0,min=0;
    if(num!=6174&&num)
    {
        cut(array,num);
        max_min(array,&max,&min);
        num=max-min;
        printf("%d-%d=%d\n",max,min,num);
        middle(num);

    }

}
int main()
{
    int number;
    scanf("%d",&number);
    middle(number);
    return 0;
}

[ 本帖最后由 tompobing 于 2013-3-21 20:45 编辑 ]
搜索更多相关主题的帖子: arr max include 
2013-03-21 20:39
a151141
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:197
专家分:680
注 册:2012-10-19
得分:25 
#include <stdio.h>
void max_min(int* arr,int *max,int *min)
{
   int *p,*q;
   for(p=arr;p<arr+4;p++)
       *min=*min*10+*p;
   for(q=arr+3;q>=arr;q++)                         //楼主粗心了,这该是q--呢
       *max=*max*10+*q;
}
void cut(int *arr,int num)
{
    int i,temp;
    int *p,*q;
    for(i=0;i<4;++i)
    {
        arr[i]=num%10;
        num/=10;
    }
    for(i=0;i<4;++i)
     for(p=arr,q=arr+1;p<arr+3-i;p++,q++)
        if(*p>*q)
        {
            temp=*p;
            *p=*q;
            *q=temp;
        }
}

void middle(int num)
{
    int array[4];
    int max=0,min=0;
    if(num!=6174&&num)
    {
        cut(array,num);
        max_min(array,&max,&min);
        num=max-min;
        printf("%d-%d=%d\n",max,min,num);
        middle(num);

    }

}
int main()
{
    int number;
    scanf("%d",&number);
    middle(number);
    return 0;
}

世界上幸福的事就是抓到一只羊,更幸福的事就是抓到两只羊……
2013-03-21 21:29
tompobing
Rank: 8Rank: 8
等 级:蝙蝠侠
帖 子:260
专家分:809
注 册:2012-12-9
得分:0 
回复 2楼 a151141
这。。。。不知该说什么了,粗心大意害死人啊
2013-03-21 21:50



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-401527-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017798 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved