2018-04-28 PAT 1019

給定任一個(gè)各位數(shù)字不完全相同的4位正整數(shù),如果我們先把4個(gè)數(shù)字按非遞增排序胳泉,再按非遞減排序拐叉,然后用第1個(gè)數(shù)字減第2個(gè)數(shù)字,將得到一個(gè)新的數(shù)字扇商。一直重復(fù)這樣做凤瘦,我們很快會(huì)停在有“數(shù)字黑洞”之稱的6174,這個(gè)神奇的數(shù)字也叫Kaprekar常數(shù)案铺。

例如蔬芥,我們從6767開(kāi)始,將得到

7766 - 6677 = 1089
9810 - 0189 = 9621
9621 - 1269 = 8352
8532 - 2358 = 6174
7641 - 1467 = 6174
... ...

現(xiàn)給定任意4位正整數(shù)控汉,請(qǐng)編寫(xiě)程序演示到達(dá)黑洞的過(guò)程笔诵。

輸入格式:

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

輸出格式:

如果N的4位數(shù)字全相等姑子,則在一行內(nèi)輸出“N - N = 0000”乎婿;否則將計(jì)算的每一步在一行內(nèi)輸出,直到6174作為差出現(xiàn)街佑,輸出格式見(jiàn)樣例次酌。注意每個(gè)數(shù)字按4位數(shù)格式輸出。

輸入樣例1:
6767
輸出樣例1:
7766 - 6677 = 1089
9810 - 0189 = 9621
9621 - 1269 = 8352
8532 - 2358 = 6174
輸入樣例2:
2222
輸出樣例2:
2222 - 2222 = 0000

經(jīng)驗(yàn)教訓(xùn)

  1. 對(duì)輸出格式有了更多了解舆乔,比如printf("%04d")
  2. qsort 有了更多的認(rèn)識(shí),不用真是難受剂公。
#include <stdio.h>
#include <stdlib.h>

int cmp(const void *a, const void *b) {return *(int*)b - *(int*)a;}

int sort(int n)
{
    int digits[4] = {n/1000, n%1000/100, n%100/10, n%10};
    qsort(digits, 4, sizeof(int), cmp);
    return digits[0] * 1000 + digits[1] * 100 + digits[2] * 10 + digits[3];
}

int reverse(int n)
{
    return n/1000 + n%1000/100 * 10 + n%100/10 * 100 + n%10 * 1000;
}

int main()
{
    int N;
    scanf("%d", &N);
    while(1)
    {
        N = sort(N);
        printf("%04d - %04d = %04d\n", N, reverse(N), N - reverse(N));
        N = N - reverse(N);
        
        if(N == 0 || N == 6174) 
            break;
    }
    return 0;
}
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末希俩,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子纲辽,更是在濱河造成了極大的恐慌颜武,老刑警劉巖,帶你破解...
    沈念sama閱讀 210,978評(píng)論 6 490
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件拖吼,死亡現(xiàn)場(chǎng)離奇詭異鳞上,居然都是意外死亡,警方通過(guò)查閱死者的電腦和手機(jī)吊档,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 89,954評(píng)論 2 384
  • 文/潘曉璐 我一進(jìn)店門(mén)篙议,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人,你說(shuō)我怎么就攤上這事鬼贱∫魄樱” “怎么了?”我有些...
    開(kāi)封第一講書(shū)人閱讀 156,623評(píng)論 0 345
  • 文/不壞的土叔 我叫張陵这难,是天一觀的道長(zhǎng)舟误。 經(jīng)常有香客問(wèn)我,道長(zhǎng)姻乓,這世上最難降的妖魔是什么嵌溢? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 56,324評(píng)論 1 282
  • 正文 為了忘掉前任,我火速辦了婚禮蹋岩,結(jié)果婚禮上赖草,老公的妹妹穿的比我還像新娘。我一直安慰自己星澳,他們只是感情好疚顷,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,390評(píng)論 5 384
  • 文/花漫 我一把揭開(kāi)白布。 她就那樣靜靜地躺著禁偎,像睡著了一般腿堤。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上如暖,一...
    開(kāi)封第一講書(shū)人閱讀 49,741評(píng)論 1 289
  • 那天笆檀,我揣著相機(jī)與錄音,去河邊找鬼盒至。 笑死酗洒,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的枷遂。 我是一名探鬼主播樱衷,決...
    沈念sama閱讀 38,892評(píng)論 3 405
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼酒唉!你這毒婦竟也來(lái)了矩桂?” 一聲冷哼從身側(cè)響起,我...
    開(kāi)封第一講書(shū)人閱讀 37,655評(píng)論 0 266
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤痪伦,失蹤者是張志新(化名)和其女友劉穎侄榴,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體网沾,經(jīng)...
    沈念sama閱讀 44,104評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡癞蚕,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,451評(píng)論 2 325
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了辉哥。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片桦山。...
    茶點(diǎn)故事閱讀 38,569評(píng)論 1 340
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出度苔,到底是詐尸還是另有隱情匆篓,我是刑警寧澤,帶...
    沈念sama閱讀 34,254評(píng)論 4 328
  • 正文 年R本政府宣布寇窑,位于F島的核電站鸦概,受9級(jí)特大地震影響,放射性物質(zhì)發(fā)生泄漏甩骏。R本人自食惡果不足惜窗市,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,834評(píng)論 3 312
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望饮笛。 院中可真熱鬧咨察,春花似錦、人聲如沸福青。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 30,725評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)无午。三九已至媒役,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間宪迟,已是汗流浹背酣衷。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 31,950評(píng)論 1 264
  • 我被黑心中介騙來(lái)泰國(guó)打工, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留次泽,地道東北人穿仪。 一個(gè)月前我還...
    沈念sama閱讀 46,260評(píng)論 2 360
  • 正文 我出身青樓,卻偏偏與公主長(zhǎng)得像意荤,于是被迫代替她去往敵國(guó)和親啊片。 傳聞我的和親對(duì)象是個(gè)殘疾皇子,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,446評(píng)論 2 348