6174数学黑洞

1. 数学黑洞6174的问题

第1步：1000-1=999
第2步：9990-999=8991
第3步：9981-1899=8082
第4步：8820-288=8532
第5步：8532-2358=6174

2. 数学黑洞6174再实际中有什么用

所谓数学黑洞，就是从给定的数字出发，在规定的运算法则下，最终都将得到固定的一个值，再也跳不出去了。就像宇宙中的黑洞可以将任何物质，包括光都牢牢吸住，无法逃脱一样。这样的数字称为“黑洞数”，这样的运算叫做“重排求差”操作。例如，三位数的黑洞数为495 简易推导过程：随便找个数，如297，三个位上的数从小到大和从大到小各排一次，为972和279，相减，得693 按上面做法再做一次，得到594，再做一次，得到495 之后反复都得到495再如，四位数的黑洞数有6174

3. 数学黑洞6174。 已知:一个任意的四位正整数。将数字重新组合成一个最大的数和最小的数相减。重复这

var
	a,b,c:longint;
	s,s1,s2:string[4];
	ch:char;
	i,j,k,code:integer;
begin
	{readln(s);}
	s:='8899';
	iflength(s)<>4thenwriteln('error');
	k:=0;
	repeat	
		inc(k);
		fori:=1to3doforj:=i+1to4do
			ifs[i]>s[j]then
				beginch:=s[i];s[i]:=s[j];s[j]:=ch;end;
		s1:=s;
		fori:=1to2do
			beginch:=s[i];s[i]:=s[5-i];s[5-i]:=ch;end;
		s2:=s;
		val(s1,a,code);
		val(s2,b,code);
		c:=b-a;
		str(c:4,s);
		writeln(a:6,b:6,c:6);
	until(c=6174)or(k>20);
	writeln(k);
end.
	

4. 数学黑洞之一的6174，为什么9998却不行呢

9998-8999=0999
9990-0999=8991
9981-1899=8082
8820-0288=8532
8532-2358=6174
结果成立。
运算结果为三位数是首位添0补充成4位