Pascal-数学黑洞6174。求证：所有四位数的数字（全相同的除外），均能得到6174。输出掉进黑洞的步数

时间：2025-06-25 13:59 作者：斜阳旅游网分类：广场大全浏览：0

一、Pascal-数学黑洞6174。求证：所有四位数的数字（全相同的除外），均能得到6174。输出掉进黑洞的步数

program asdf; var a:array[1000..9998] of integer; b:array[1..24] of integer; i,j,k,l,w,x,y,z,w1,x1,y1,z1,xx,yy,ii:Integer; begin for i:=1000 to 9998 do begin ii:=i; w:=ii div 1000; x:=ii div 100-w*10; y:=ii div 10-w*100-x*10; z:=ii mod 10; if not((w=x)and(x=y)and (y=z)) then begin yy:=1; for j:=1 to 7 do for w1:=1 to 4 do for x1:=1 to 4 do for y1:=1 to 4 do for z1:=1 to 4 do begin if (w1+x1+y1+z1=1+2+3+4)and(w1*x1*y1*z1=1*2*3*4) then begin for k:=1 to 4 do begin xx:=1; case k of 1:for l:=1 to w1 do begin xx:=xx*10; b[yy]:=b[yy]+w1; end; 2:for l:=1 to x1 do begin xx:=xx*10; b[yy]:=b[yy]+x1; end; 3:for l:=1 to y1 do begin xx:=xx*10; b[yy]:=b[yy]+y1; end; 4:for l:=1 to z1 do begin xx:=xx*10; b[yy]:=b[yy]+z1; inc(yy); end; end; end; end; end; for k:=1 to 24 do for l:=1 to k do if b[k]>b[l] then begin b[k]:=b[l]+b[k]; b[l]:=b[k]-b[l]; b[k]:=b[k]-b[l]; end; ii:=abs(b[k]-b[l]); if ii=6174 then begin a[i]:=j; break; end; end; end; end; for i:=1000 to 9998 do writeln(i,':',a[i]); readln; end.

二、魔方教程公式口诀七步是什么？

魔方教程公式口诀七步：1、右逆,上顺,前逆,上逆；2、右逆,下逆,右顺,下顺；3、上顺,右顺,上逆,右逆,上逆,前逆,上顺,前顺；4、前顺,右顺,上顺,右逆,上逆,前逆；5、右顺,上顺,右逆,上顺,右顺,上顺,上顺,右逆；6、上顺,右顺,上逆,左逆,上顺,右逆,上逆,左顺；7、右逆,下逆,右顺,下顺。

魔方练习的时间长了，就熟练了。首先在玩之前，要知道什么是棱块，就是中间的，什么是角块，就是两边的角。在玩之前，一定要先把公式练熟练才行。

还原魔方可以分七个步骤。

第一步，顶层做出绿十字。可用公式：（右逆，上顺，前逆，上逆）

（备注）这里逆是指逆时针，顺指顺指针。魔方又分为上下左右前后，所以会出现以上情况。

首先找到中心是绿色的，然后以这个绿色为中心，把他四周的那四个绿色棱块找出来，最后拼成一个绿色十字。要想拼成这绿十字，也得是从中间的绿色棱块找出来的。

第二步，使绿色角块归位。可用公式：（右逆，下逆，右顺，下顺）公式可重复多遍。

第三步，使中间棱块归位。可为两种情况

第一种情况公式是：（上顺，右顺，上逆，右逆，上逆，前逆，上顺，前顺）

第二种情况公式是：（上逆，前逆，上顺，前顺，上顺，右顺，上逆，右逆）

第四步，使顶层棱边归位。可用公式：（前顺，右顺，上顺，右逆，上逆，前逆）

第五步，使顶层棱块归位。可用公式：（右顺，上顺，右逆，上顺，右顺，上顺，上顺，右逆）

第六步，使顶层的角块归位。可用公式：（上顺，右顺，上逆，左逆，上顺，右逆，上逆，左顺）

第七步，使顶层角块归位。可用公式：（右逆，下逆，右顺，下顺）可重复多遍。这时一定要注意，拿着魔方，是红色面在前面，顺时针转动顶层（上顺转一下），然后将需要转动的角转到右上前的位置。按照公式可多几次，做步骤时，下层可能会乱，不要担心，只需按公式继续做就可以。

三、QQ空间小秘书怎么使用？

软件下载地址：

下载完后，点即就打开了

你会看到 QQ空间小秘书应用程序，你就点它了，登陆自己的QQ给别人留言了

《QQ空间小秘书》使用教程：

===============初级入门==============

★ 使用方法四步曲：

1、按键盘F12,启动QQ登陆窗口,登陆您的QQ号码;

2、在上面的文本框输入对方的QQ号或QQ空间网址;

3、清除掉本栏内容,并在这里输入您要发表的内容;

4、输入验证码,点击右边所显示的按钮即可发表留言。

===============中级成长==============

★ 常用功能快捷键：

F5 打开我的日志 | Ctrl+A 发表留言 | Ctrl+D 互踩队列

F6 打开我的留言 | 空白键发表留言 | Ctrl+F 智能留言

F8 QQ空间管理 | Ctrl+S 回复日志 |

F9 保存内容 | 回车键回复日志 |

F12 快速登陆QQ |

★ 保存你常发表的内容：

1、按键盘F9，弹出内容保存对话框；

2、填写识别标题，和你你要保存的内容;

3、添加后,关闭对话框，再按键盘Ctrl+F；

4、点击列表中的识别标题即可使用你保存内容。

===============高级晋升==============

★ 多条留言内容循环使用：

1、按键盘Ctrl+F,打开智能留言控制面板;

2、选择“随机选择”，每次发表会随机选择一条内容；

3、选择“循环使用”，即可实现循环发表每一条内容。

★ 同时踩多个QQ空间：

1、按键盘Ctrl+D,打开互踩队列控制面板;

2、填写对方的QQ号码以及名字;

3、填写完后点击“添加”,号码会保存到列表中;

4、重复以上2、3操作，添加多个QQ号码；

5、选择设置每个QQ踩多少次后自动踩下一个；

6、下面还可以设置“循环”、“随机”选择列表中的QQ。

Pascal-数学黑洞6174。求证：所有四位数的数字（全相同的除外），均能得到6174。输出掉进黑洞的步数

一、Pascal-数学黑洞6174。求证：所有四位数的数字（全相同的除外），均能得到6174。输出掉进黑洞的步数

二、魔方教程公式口诀七步是什么？

三、QQ空间小秘书怎么使用？

相关文章

猜你喜欢

天津复地湖滨广场什么情况？

潍坊有几个万达广场？

滨海广场开放时间？

成语……万吉？

大腿和手臂的肉越来越多了，怎么办？？快帮帮我饿，！！