PAT 乙級(jí) 1019 數(shù)字黑洞 (沒過測(cè)試點(diǎn)2)

題目

給定任一個(gè)各位數(shù)字不完全相同的 4 位正整數(shù)粉捻,如果我們先把 4 個(gè)數(shù)字按非遞增排序,再按非遞減排序雪侥,然后用第 1 個(gè)數(shù)字減第 2 個(gè)數(shù)字碗殷,將得到一個(gè)新的數(shù)字。一直重復(fù)這樣做速缨,我們很快會(huì)停在有“數(shù)字黑洞”之稱的 6174锌妻,這個(gè)神奇的數(shù)字也叫 Kaprekar 常數(shù)。
例如旬牲,我們從6767開始仿粹,將得到
7766 - 6677 = 1089
9810 - 0189 = 9621
9621 - 1269 = 8352
8532 - 2358 = 6174
7641 - 1467 = 6174
... ...
現(xiàn)給定任意 4 位正整數(shù),請(qǐng)編寫程序演示到達(dá)黑洞的過程原茅。

輸入格式

輸入給出一個(gè) (0,10000)區(qū)間內(nèi)的正整數(shù)N

輸出格式

如果 N 的 4 位數(shù)字全相等牍陌,則在一行內(nèi)輸出 N - N = 0000;否則將計(jì)算的每一步在一行內(nèi)輸出员咽,直到 6174 作為差出現(xiàn)毒涧,輸出格式見樣例。注意每個(gè)數(shù)字按 4 位數(shù)格式輸出。

?##輸入樣例 1:

6767

輸出樣例1

image.png

輸入樣例2

image.png

思路分析

①先輸入一個(gè)最多四位的正整數(shù)契讲,用int型保存仿吞。然后用兩個(gè)int型的數(shù)組num1和num2保存?zhèn)€位、十位捡偏、百位唤冈、千位的數(shù)值。
②分別用qsort()函數(shù)對(duì)兩個(gè)數(shù)組進(jìn)行排序银伟,一個(gè)遞增你虹,另一個(gè)遞減,然后還原成4位的整數(shù)彤避,進(jìn)行相減傅物,并打印結(jié)果。
注意:最后的結(jié)果輸出應(yīng)該輸出成"%04d"琉预。

代碼

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
int cmp_up(const void *a,const void *b)
{
    return *(int*)a-*(int*)b;
}
int cmp_down(const void *a,const void *b)
{
    return *(int *)b-*(int *)a;
}
int main()
{
    int n=0,number;
    int num1[4]={0},num2[4]={0};
    scanf("%d",&number);
    if(number>9999) return 1;
    int count=0,tmp_1=number;

    while(tmp_1)
    {
        count++;
        tmp_1 /=10;
    }
    tmp_1 = number;
    for(int i=count-1;i>=0;i--)
    {
       int data = pow(10,i);
       int j = tmp_1/data;
       num1[i] =j;
       tmp_1 = tmp_1 - j*data;
     } 

    for(int i=0;i<4;i++)
     num2[i]=num1[i];
    if(num1[0]==0 && num1[1]==0&&num1[2]==0 && num1[3]==0)
      return 1;
    
    while(1)
    {
        int cnt=1,tmp;
        qsort(num1,4,sizeof(int),cmp_down);
        qsort(num2,4,sizeof(int),cmp_up);
        int data1=num1[0]*1000+num1[1]*100+num1[2]*10+num1[3];
        int data2=num2[0]*1000+num2[1]*100+num2[2]*10+num2[3];
        int n=data1-data2;
        tmp=n;
        while(tmp/10)
        {
            cnt++;
            tmp/=10;
        }
        tmp = n;
        for(int i=cnt-1;i>=0;i--)
        {
            int data=pow(10,i);
            num1[i]=tmp/data;
            num2[i]=num1[i];
            tmp = tmp-num1[i]*data;
        }
        
        printf("%04d - %04d = %04d\n",data1,data2,n);
        if(n==6174||n==0) break;
    }
    return 0;
  }
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末董饰,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子圆米,更是在濱河造成了極大的恐慌卒暂,老刑警劉巖,帶你破解...
    沈念sama閱讀 211,561評(píng)論 6 492
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件娄帖,死亡現(xiàn)場(chǎng)離奇詭異也祠,居然都是意外死亡,警方通過查閱死者的電腦和手機(jī)近速,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 90,218評(píng)論 3 385
  • 文/潘曉璐 我一進(jìn)店門齿坷,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人数焊,你說我怎么就攤上這事∑槌。” “怎么了佩耳?”我有些...
    開封第一講書人閱讀 157,162評(píng)論 0 348
  • 文/不壞的土叔 我叫張陵,是天一觀的道長(zhǎng)谭跨。 經(jīng)常有香客問我干厚,道長(zhǎng),這世上最難降的妖魔是什么螃宙? 我笑而不...
    開封第一講書人閱讀 56,470評(píng)論 1 283
  • 正文 為了忘掉前任蛮瞄,我火速辦了婚禮,結(jié)果婚禮上谆扎,老公的妹妹穿的比我還像新娘挂捅。我一直安慰自己,他們只是感情好堂湖,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,550評(píng)論 6 385
  • 文/花漫 我一把揭開白布闲先。 她就那樣靜靜地躺著状土,像睡著了一般。 火紅的嫁衣襯著肌膚如雪伺糠。 梳的紋絲不亂的頭發(fā)上蒙谓,一...
    開封第一講書人閱讀 49,806評(píng)論 1 290
  • 那天,我揣著相機(jī)與錄音训桶,去河邊找鬼累驮。 笑死,一個(gè)胖子當(dāng)著我的面吹牛舵揭,可吹牛的內(nèi)容都是我干的谤专。 我是一名探鬼主播,決...
    沈念sama閱讀 38,951評(píng)論 3 407
  • 文/蒼蘭香墨 我猛地睜開眼琉朽,長(zhǎng)吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼毒租!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起箱叁,我...
    開封第一講書人閱讀 37,712評(píng)論 0 266
  • 序言:老撾萬榮一對(duì)情侶失蹤墅垮,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后耕漱,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體算色,經(jīng)...
    沈念sama閱讀 44,166評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,510評(píng)論 2 327
  • 正文 我和宋清朗相戀三年螟够,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了灾梦。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點(diǎn)故事閱讀 38,643評(píng)論 1 340
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡妓笙,死狀恐怖若河,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情寞宫,我是刑警寧澤萧福,帶...
    沈念sama閱讀 34,306評(píng)論 4 330
  • 正文 年R本政府宣布,位于F島的核電站辈赋,受9級(jí)特大地震影響鲫忍,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜钥屈,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,930評(píng)論 3 313
  • 文/蒙蒙 一悟民、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧篷就,春花似錦射亏、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,745評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽银锻。三九已至,卻和暖如春做鹰,著一層夾襖步出監(jiān)牢的瞬間击纬,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 31,983評(píng)論 1 266
  • 我被黑心中介騙來泰國(guó)打工钾麸, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留更振,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 46,351評(píng)論 2 360
  • 正文 我出身青樓饭尝,卻偏偏與公主長(zhǎng)得像肯腕,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子钥平,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,509評(píng)論 2 348

推薦閱讀更多精彩內(nèi)容