第12講 プロシージャの再帰的使用によって魔方陣を自動生成する
第６話 セル番号の付け替え
前話の答えは

を

とセル番を変更すれば良いのです。
これでおそらく４次の段階で１０００倍
５次なら１万倍以上速くなります。
なぜでしょうか。
答えは３０行ほど下。




























答え

各セルの中で条件が強いセルを考えてください。

例えば

のセルは
ａ＋ｂ＋ｃ＋ｄ＝３４
とｂ＋ｆ＋ｊ＋ｋ＝３４の２条件を満たせば良いのに対して、

のセルは
ｃ＋ｇ＋ｋ＋ｏ＝３４
ｉ＋ｊ＋ｋ＋ｌ＝３４
ａ＋ｆ＋ｋ＋ｐ＝３４
の３条件を満たす必要があります。
つまり、
対角線上のセルはすべて３つの条件を見たさなければならないのに対して、
対角線以外のセルは２つの条件を満たせば良いのです。

私たち高校教諭は、
毎年春休みに時間割を組まなければなりません。
これが年々大変になってきています。
習熟・選択・合同などいろいろな
授業形態が取られるようになっているからです。
実は、時間割を組むコツは条件の厳しい枠から埋めていくです。
分割・合同で複数のクラスに渡り、
教室が制限されていて、
しかも、非常勤の場合時間も制約されている授業があります。
最初に単位数が多く１人で持っている授業を先に入れてしまうと、
条件の厳しい駒が身動きできなくなってしまいます。
条件の厳しい駒を先に入れて、
単位数の多い単駒（１人で１教室の授業）を後から入れるのが、
ミソです。
行き詰まったとき、
単駒は比較的自由に動かせるからです。

条件の厳しいところからクリアする！
これは時間割だけでなく、
どんな問題にも適応できる絶対原則です。
厳しいところから埋めていくと場合の数が、
１／１０００にも１／１００００にもなるからです。
ですから、セル番号を

と付け替えるだけで生成時間が
１０００倍ぐらいになったりする訳です。

さて、問題はその番号振り直しをどのようにするかです。
これは、難問ですよ。
というのは、

ｎ＝３のとき

ｎ＝４のとき

ｎ＝５のとき

ｎ＝６のとき

ｎ＝７のとき

こんな複雑な動きをするからです。
最初私が組んだとき、
偶数の場合と奇数の場合とに場合分けをして、
Ｉｆ文でかなり複雑なプログラムを組みましたが、
読者の仮屋崎さんから
天才的な番号付けプログラムのアイデアが寄せられました。

第５話へ　第７話へ

初心者のためのc++ vc++ c言語 入門 基礎から応用までへ
初心者のための excel 2007 2010 2013 vba マクロ 入門 基礎から応用まで
初心者のための世界で一番わかりやすいVisual C++入門基礎講座
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座へ
vb講義トップへ
ＶＢ講義基礎へ
専門用語なしのC++入門へ
専門用語なしのJava入門へ
専門用語なしのVBA入門

数独のページ
魔方陣のページ
数学研究室に戻る
本サイトトップへ