Pascal programming-Array 唔識做..

2010-10-08 6:01 am
9x9 Magic Square:

1 6 8 ? ? ? ? ? ?
9 2 4 ? 7 ? ? 6 ?
5 7 3 ? ? ? ? ? ?

? ? ? 4 9 2 ? ? ?
? 9 ? 3 5 7 ? 1 ?
? ? ? 8 1 6 ? ? ?

? ? ? ? ? ? 7 3 5
? 4 ? ? 3 ? 6 8 1
? ? ? ? ? ? 2 4 9

1.Complete the Sudoku .

2.Write a Pascal programming to verifty any 9x9 Sudoku is a magic square in which each row, column and diagonal has 9 different numbers and each 3x3 style box has 9 different numbers.
更新1:

我都係唔係好明... 可唔以打個complete program 比我睇

回答 (1)

2010-10-08 11:49 pm
✔ 最佳答案
1)我諗你叫你人手做。因為用PROGRAM去解以程度看冇可能完成。
2)Pascal 的array 定義為 array [1..n] of something.
以你的例子係以9x9 方格去存放一個sudoku的數字,即係

Type
MySudoku : array [1..9,1..9] of integer;

咁做法係首先要用家輸入,以 for i:=1 to 9 do for j:= 1 to 9 do readln() 就得,或者直接用 const定義入去

跟住要VERIFY每行每列都係獨立9個數字。即係要For ROW:= 1 to 9 個一次抽9個字,(可以用另一個ARRAY),做一次SORTING,然後比較數字係1至9。
再做一次for COLOUMN:=1 to 9,再做一次3x3抽9個數字(呢個可能你要諗諗)。
不過我想講,DIAGONAL未必係9個數字齊,因為SUDOKU冇呢個要求。


收錄日期: 2021-04-26 11:26:07
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20101007000051KK01642

檢視 Wayback Machine 備份