数字黑洞求解数字黑洞6174:是指一个任意的四位正整数,将数字重新组合成一个最大的数和最小的数相减,最多七步,必得6174,输出掉进黑洞的步数。是PASCAL哦

问题描述:

数字黑洞求解
数字黑洞6174:是指一个任意的四位正整数,将数字重新组合成一个最大的数和最小的数相减,最多七步,必得6174,输出掉进黑洞的步数。
是PASCAL哦

dfuursfhuhjjhhjidkjisirusiursururbrtvuryebuh

求什么?
是找出一个数字黑洞还是判断是否存在?

program lkszhd;vari,a,b,j,p,q:longint;code:integer;s:string;c:char;beginreadln(a);i:=0;while (a6174) or (i=7) dobeginstr(a,s);for j:=1 to 3 dobeginq:=j;for p:=j+1 to 4 doif s[p]>s[q] then q:=p;c:=s[j]...

123数字黑洞
黑洞原是天文学中的概念,表示这样一种天体:它的引力场是如此之强,就连光也不能逃脱出来。数学中借用这个词,指的是某种运算,这种运算一般限定从某些整数出发,反复迭代后结果必然落入一个点或若干点。数字黑洞运算简单,结论明了,易于理解,故人们乐于研究。但有些证明却不那么容易。
任取一个数,相继依次写下它所含的偶数的个数,奇数的个数与这两个数字的和,将得到一个正整数。对这个新的数再把它的偶数个数和奇数个数与其和拼成另外一个正整数,如此进行,最后必然停留在数123。
例:所给数字 14741029
第一次计算结果 448
第二次计算结果 303
第三次计算结果 123