#include<stdlib.h>
int n;
int a[10][10];
int x[100],y[100];
int s;
namespace 数独解答作成 {
･
･
･
#pragma endregion
private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {
DateTime^ hj=DateTime::Now;
n=9;
s=0;
g(n);
int i;
f(0);
array<String^>^ w=gcnew array<String^>(10);
w[4]=L"数";w[5]=L"独";w[6]=L"総";w[7]=L"数";w[8]=L"：";w[9]=s.ToString();
dataGridView1->Rows->Add(w);
DateTime^ ow=DateTime::Now;
TimeSpan sa=ow->Subtract(*hj);
w[4]=L"時";w[5]=L"間";w[6]=L"計";w[7]=L"則";w[8]=L"：";w[9]=(sa.TotalSeconds).ToString();
dataGridView1->Rows->Add(w);
}
void g(char n){
char i,j;
for(i=0;i<n*n;i++){
x[i]=i%n;
y[i]=i/n;
}
}
void f(char g){
if(s==100)return;
int i,j,k,h,kk,kkk,xs,ys;
array<String^>^ w=gcnew array<String^>(10);
rand();
rand();
kk=rand()%n;
for(i=0;i<n;i++){
kkk=(kk+i)%n+1;
a[y[g]][x[g]]=kkk;
h=1;
if(x[g]>0){
for(j=0;j<x[g];j++){
if(a[y[g]][x[g]]==a[y[g]][j]){
h=0;
break;
}
}
}
if(h==1){
if(y[g]>0){
for(j=0;j<y[g];j++){
if(a[y[g]][x[g]]==a[j][x[g]]){
h=0;
break;
}
}
}
}
if(h==1){
xs=x[g]/3;
ys=y[g]/3;
for(j=0;j<=y[g]-3*ys;j++){
for(k=0;k<3;k++){
if(j==y[g])if(k==x[g])break;
if((y[g]!=3*ys+j) && (x[g]!=3*xs+k)){
if(a[y[g]][x[g]]==a[3*ys+j][3*xs+k]){
h=0;
break;
}
}
}
if(h==0)break;
}
}
if(h==1){
if(g<n*n-1){
f(g+1);
}
else{
for(j=0;j<n;j++){
for(k=0;k<n;k++){
w[k]=(a[j][k]).ToString();
}
dataGridView1->Rows->Add(w);
}
for(j=0;j<10;j++)w[j]=L"";
dataGridView1->Rows->Add(w);
s++;
if(s==100)return;
}
}
}
}
};
}
実行画面
･
･
･
ダウンロード用ファイルForm14.h
ピンクの部分が非常に難解です。
これについては、次話で解説しましょう。
解説前に課題を出すのは、反則かもしれませんが課題を出しておきましょう。
今回の解答例だと、ブロックがちょっとわかりにくいですね。
そこで、Windows版マルチスレッド対応の数独問題作成ソフトVer.1のように、
境界線のところに＊を入れて、ブロックがはっきり分かるように変更して下さい。
