第２話 仮屋崎座標作成プログラム
迷宮の出口はあるのです。
以下の天才的な座標作成プログラムを考え出された方は読者の仮屋崎さんです。
このプログラムを見ると、どんな難問に対しても人間は答えを見つけてしまうのではないかと思います。
#include<iostream>
using namespace std;
using namespace System;
void f0();
void f1(int g);
void f2();
int n,cn;
int a[10][10],x[100],y[100];
int main(){
cout<<"何次魔方陣を作成させるのかキーボードから入力してください。"<<endl;
cout<<"次数＝";
scanf("%d",&n);
//DateTime^ hj=DateTime::Now;
cn=0;
f0();
/*
f1(0);
cout<<n<<"次魔方陣が"<<cn<<"個できました。"<<endl;
DateTime^ ow=DateTime::Now;
TimeSpan sa=ow->Subtract(*hj);
cout<<"計算時間は"<<sa.TotalSeconds<<"秒です。"<<endl;
*/
int i,j,c[10][10];
for(i=0;i<n*n;i++){
c[y[i]][x[i]]=i;
}
for(i=0;i<n;i++){
for(j=0;j<n;j++){
if(c[i][j]<10)cout<<" "<<c[i][j]<<" ";
if(c[i][j]>=10)cout<<c[i][j]<<" ";
}
cout<<endl;
}
}
void f0(){
int i,j,c;
int b[10][10];
for(i=0;i<n;i++){
for(j=0;j<n;j++){
b[i][j]=-1;
}
}
for(i=0;i<n;i++){
b[i][i]=i;
}
c=n-1;
for(i=0;i<n;i++){
if(b[i][n-1-i]==-1){
c++;
b[i][n-1-i]=c;
}
}
for(i=0;i<n;i++){
for(j=0;j<n;j++){
if(b[i][j]==-1){
c++;
b[i][j]=c;
}
}
}
for(i=0;i<n;i++){
for(j=0;j<n;j++){
x[b[i][j]]=j;
y[b[i][j]]=i;
}
}
}
void f1(int g){
int i,j,h,w,x,y;
y=g/n;
x=g%n;
for(i=1;i<n*n+1;i++){
a[y][x]=i;
h=1;
if(g>0){
for(j=0;j<g;j++){
if(a[y][x]==a[j/n][j%n]){
h=0;
break;
}
}
}
if(h==1 && x==n-1){
w=0;
for(j=0;j<n;j++){
w+=a[y][j];
}
if(w!=n*(n*n+1)/2)h=0;
}
if(h==1 && y==n-1){
w=0;
for(j=0;j<n;j++){
w+=a[j][x];
}
if(w!=n*(n*n+1)/2)h=0;
}
if(h==1 && y==n-1 && x==0){
w=0;
for(j=0;j<n;j++){
w+=a[j][n-1-j];
}
if(w!=n*(n*n+1)/2)h=0;
}
if(h==1 && y==n-1 && x==n-1){
w=0;
for(j=0;j<n;j++){
w+=a[j][j];
}
if(w!=n*(n*n+1)/2)h=0;
}
if(h==1){
if(g+1<n*n){
f1(g+1);
}
else{
cn++;
f2();
//if(cn==100)break;
}
}
//if(cn==100)break;
}
}
void f2(){
int i,j;
for(i=0;i<n;i++){
for(j=0;j<n;j++){
if(a[i][j]<10)cout<<" "<<a[i][j]<<" ";
if(a[i][j]>=10)cout<<a[i][j]<<" ";
}
cout<<endl;
}
cout<<endl;
}
ピンクの部分は座標付けがうまくいっているかを確認するために一時的に注釈文に変えことによって外してあります。
実行例
どうです。見事としか表現にしようがないですよね。
