数字黑洞求解
发布网友
发布时间:2022-05-29 20:58
我来回答
共4个回答
热心网友
时间:2023-11-26 20:54
123数字黑洞
黑洞原是天文学中的概念,表示这样一种天体:它的引力场是如此之强,就连光也不能逃脱出来。数学中借用这个词,指的是某种运算,这种运算一般限定从某些整数出发,反复迭代后结果必然落入一个点或若干点。数字黑洞运算简单,结论明了,易于理解,故人们乐于研究。但有些证明却不那么容易。
任取一个数,相继依次写下它所含的偶数的个数,奇数的个数与这两个数字的和,将得到一个正整数。对这个新的数再把它的偶数个数和奇数个数与其和拼成另外一个正整数,如此进行,最后必然停留在数123。
例:所给数字 14741029
第一次计算结果 448
第二次计算结果 303
第三次计算结果 123
热心网友
时间:2023-11-26 20:55
求什么?
是找出一个数字黑洞还是判断是否存在?
热心网友
时间:2023-11-26 20:55
dfuursfhuhjjhhjidkjisirusiursururbrtvuryebuh
热心网友
时间:2023-11-26 20:56
program lkszhd;
var
i,a,b,j,p,q:longint;
code:integer;
s:string;
c:char;
begin
readln(a);
i:=0;
while (a<>6174) or (i=7) do
begin
str(a,s);
for j:=1 to 3 do
begin
q:=j;
for p:=j+1 to 4 do
if s[p]>s[q] then q:=p;
c:=s[j]; s[j]:=s[q]; s[q]:=c;
end;
val(s,a,code);
c:=s[1]; s[1]:=s[4]; s[4]:=c;
c:=s[2]; s[2]:=s[3]; s[3]:=c;
val(s,b,code);
a:=a-b;
inc(i);
end;
writeln(i);
end.