使用帕斯卡製作魔方

這種構造奇階魔方的方法稱為羅伯法。

程式：程式 Ex;

vara: array [1..1000, 1..1000] of longint;

n, i, j, k, ti, tj: longint;

beginreadln(n);

i := 1;

j := (n + 1) div 2;

for k:=1 to n * n do

beginti := i;

tj := j;

a[i, j] := k;

dec(i);

inc(j);

if i = 0 then i := n;

if j > n then j := 1;

if a[i, j] <0 then

begini := ti + 1;

j := tj;

end;end;

for i:=1 to n do

beginfor j:=1 to n dowrite(a[i, j] :5);

writeln;

end;end.

我們前幾天剛剛這樣做了。

不就是鞍座的數量嗎？

program maths;

type nbt=array [1..n] of integer;

vara:array [1..n,1..n] of integer;

b,c:nbt;

i,j:integer;

beginfor i:=1 to n do

beginfor j:=1 to n do

read(a[i,j]);

b[i]:=-32768;

c[i]:=32767;

end;for i:=1 to n do

for j:=1 to n do

beginif a[i,j]>b[i] then b[i]:=a[i,j];

if a[j,i]end;

for i:=1 to n do

for j:=1 to n do if b[i]=c[j] then write(i,j);

end.這是我的創新思維，比書本（自白）還要好。

不錯，不是嗎？

描述。。。 輸入格式、輸出格式，以及什麼是四階魔方？

就是這樣，複製它，給我積分。

program ex;

var a: array [1..1000, 1..1000] of longint;

n, i, j, k, ti, tj: longint;

beginreadln(n);

i := 1;

j := (n + 1) div 2;

for k:=1 to n * n do

beginti := i;

tj := j;

a[i, j] := k;

dec(i);

inc(j);

if i = 0 then i := n;

if j > n then j := 1;

if a[i, j] <0 then

begini := ti + 1;

j := tj;

end; end;

for i:=1 to n do

beginfor j:=1 to n do

write(a[i, j] :5);

writeln;

end; end.

解決方案：可能的方陣。

帶 for 迴圈

如果 heng[1]+.heng[3]<>shu[1]..shu[3] then continue;

最後，如果滿足 .

如果 a[1,1]+a[2,2]+a[3,3]=shu[1]+shu[2]+shu[3]，則 writeln（方陣）。

不過，我還沒有嘗試過。

但這應該是不可能的。

其次，如何恢復魔方並自己學習。

無需程式設計。 如果是魔術板，可以程式設計。

學習魔方並去這裡：它非常好。

上面的那個不錯，但是太囉嗦了，看看我這個。

始終如一地播放第一層的顏色，使第一層的側面顏色與魔方4的側面顏色相同。

第二層次公式：向上直-右直-向上反轉-右反轉-向上反轉-向上反轉-向上反轉-向上直-向直。

公式的第三級（起始交叉）：右反-向上反-正反-向反-向直-正直-直-右直。

公式的第三層（四角塊）：右順-上順-右反-上順-上順-上順180°-右順-右反。

公式的第三級（也是四個角）：右直-向上-右反-向上反-右反-右反-右直18°-上反-右反-右反-右反-正反。

第三級公式（也居中）：右直-上反-右直-上直-右直-右直-上直-上直-右反-下反-右反-上反-右180°

集中！ ：平滑：順時針九十度。

反向：逆時針九十度。

我已經編好了......有 N 個程序我已經除錯......很好，有時它會超時......雖然我可以玩魔方，但七階會......

魔方技術只能練習，不能說出來。

你說這麼多就不明白了。

讓我們自己真正練習一下。

我把 6 個方面放在一起，更多地使用我的大腦。

我認為一步到位的擴充套件規則應該遠遠超過6種，而且至少介於兩者之間。 另外，我不知道在26步內是向左轉還是向右轉。 所以。 搜尋很可能會飄飄然。

此外，我認為應該可以新增一些優化。 為了進行啟發式，啟發式函式是塊數和目標數之間的差值。 或者隨機獲得...拼出字元是件好事。

首先，有必要澄清移動魔方的方法有多少種

把一側朝向你 那麼前、後、右、左、上、下旋轉只有6種方式，都是指順時針旋轉90°，這樣180°和270°也可以用這些方法復合，然後搜尋... 它必須是暴力的...... 沒辦法......

另外，最好使用廣泛的搜尋，因為有一位數學家已經證明，任何魔方都可以用 26 個步驟恢復，那麼在最壞的情況下，你只需要嘗試 6 26 種可能性...... 當然，這是最壞的情況...... 如果RP不錯，它仍然非常快......

樓上怎麼牽扯到RP問題出汗

這看起來並不簡單，就算是用搜尋來寫也是費了很大的功夫，深度搜尋容易死迴圈，廣搜尋狀態不好儲存，房東看八位數字問題，那是二維的，但編起來卻不容易。