void TuiLi::SD_in()
{
//獲取題目信息
int data[]={0,5,0,0,3,0,0,0,0,
0,0,1,6,0,0,9,0,8,
3,0,0,0,0,0,0,0,0,
0,0,0,8,0,0,0,0,0,
0,0,0,0,0,0,7,0,0,
0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0};
int i,j,z=0;
for(i=0;i<9;i++)
for(j=0;j<9;j++)
{
SD[i][j]=data[z];
z++;
}
sd_in();
}
void TuiLi::sd_out()
{
int i,j,z=0;
for(i=0;i<9;i++)
for(j=0;j<9;j++)
{
SD[i][j]=sudu[z];
z++;
}
}
void TuiLi::sd_print()
{
int i,j,z=0;
sd_out();
GetLocalTime(&TIME);//獲得系統(tǒng)當前時間
printf("\n找到一個數(shù)獨解獲取時間為：%d年%d月%d日%d時%d分%d秒\n",TIME.wYear,TIME.wMonth,TIME.wDay,TIME.wHour,TIME.wMinute,TIME.wSecond);
for(i=0;i<9;i++)
{
printf(" ");
for(j=0;j<9;j++)
{
printf("%d ",SD[i][j]);
}
printf("\n");
}
printf("\n");
}
int TuiLi::ok_sd() //解數(shù)獨用剪枝函數(shù)
{
int i,j,x;
sd_out();
for(x=0;x<9;x++)
for(i=0;i<9;i++)
for(j=i+1;j<9;j++)
{
if(SD[x][i]==SD[x][j]&&SD[x][i]!=0) return 1;
}
//不允許行重復
for(x=0;x<9;x++)
for(i=0;i<9;i++)
for(j=i+1;j<9;j++)
{
if(SD[i][x]==SD[j][x]&&SD[i][x]!=0) return 1;
}
//不允許列重復
return 0;
}
int TuiLi::go_sd() //解數(shù)獨入口函數(shù)
{
int i,c=0;
//獲取題目信息
SD_in();
//回溯根節(jié)點初始值，調(diào)整這個值能調(diào)整回溯進度
if(!sudu_ji[0])sudu[0]=1;
i=0;
while(1)
{
//sd_print();
//Sleep(10);
if(sudu[i]<=9)
{
//回溯點取值在正常范圍內(nèi)
if(ok_sd())
{
//如果和剪枝條件沖突，嘗試下一個可用值
if(!sudu_ji[i])sudu[i]++;
continue;
}
if(i>=80)
{
//已經(jīng)到了最后一個節(jié)點也就是找到了一個解先輸出它
sd_print();
//然后嘗試找到其它的解
if(!sudu_ji[80])sudu[80]++;
c++;
if(c>=10)
{
printf("此題解太多只輸出前面10個解!\n\n");
return 0;
}
continue;
}
//回溯點值沒有產(chǎn)生沖突擴展他嘗試開始下一個節(jié)點
i++;
if(!sudu_ji[i])sudu[i]=1;
}else
{
//超過回溯點取值范圍
//此回溯點已死復位
if(!sudu_ji[i])sudu[i]=0;
//退回前一回溯點
i--;
if(sudu_ji[i]) i--;//回溯后的當前回溯節(jié)點是題目已經(jīng)標記過的就在往前回溯一步
if(i<0)
{
printf("已經(jīng)找出數(shù)獨所有解共有：%d個解！\n",c);
return 1;
}
//嘗試對上一回溯點進行擴展
if(!sudu_ji[i])sudu[i]++;
continue;
}
}
return 0;
}
void TuiLi::hh_init()
{
//數(shù)據(jù)初始化
int i,j;
printf("請輸入皇后問題的解題規(guī)模：");
scanf("%d",&N);
printf("\n");
for(i=0;i<1024;i++)
{
hh[i]=0;
}
for(i=0;i<30;i++)
for(j=0;j<30;j++)
{
HH[i][j]=0;
}
}
void TuiLi::hh_out()
{
//刷新棋盤數(shù)據(jù)
int i,j,z=0;
for(i=0;i<N;i++)
{
for(j=0;j<N;j++)
{
HH[i][j]=hh[z];
z++;
}
}
}
void TuiLi::hh_print()
{
//輸出問題解
int i,j;
for(i=0;i<N;i++)
{
printf(" ");
for(j=0;j<N;j++)
{
if(HH[i][j]==0) printf("+ ");
else if(HH[i][j]==1) printf("W ");
}
printf("\n");
}
printf("\n");
}
int TuiLi::ok_hh(int m)
{
int i,j,x,y;
x=0;
for(i=0;i<N;i++)
for(j=0,x=0;j<N;j++)
{
x+=HH[i][j];
if(x>=2) return 1;
}
//不允許行重復
for(i=0;i<N;i++)
for(j=0,x=0;j<N;j++)
{
x+=HH[j][i];
if(x>=2) return 1;
}
//不允許列重復
for(y=0;y<=(N-1);y++)
{
for(i=y,j=(N-1),x=0;i>=0&&j>=0;i--,j--)
{
x+=HH[i][j];
if(x>=2) return 1;
}
}
for(y=(N-1);y>=0;y--)
{
for(i=y,j=0,x=0;i>=0&&j<=(N-1);i++,j++)
{
x+=HH[i][j];
if(x>=2) return 1;
}
}
for(y=0;y<=(N-1);y++)
{
for(i=y,j=0,x=0;i>=0&&j<=(N+1);i--,j++)
{
x+=HH[i][j];
if(x>=2) return 1;
}
}
for(y=(N-1);y>=0;y--)
{
for(i=y,j=(N-1),x=0;i<=(N-1)&&j>=0;i++,j--)
{
x+=HH[i][j];
if(x>=2) return 1;
}
}
//不允許斜線重復
return 0;
}
int TuiLi::ok_hh_sc()
{
//最后判斷解是否合法
int i,j,x=0;
for(i=0;i<N;i++)
for(j=0;j<N;j++)
{
x+=HH[j][i];
}
if(x==N) return 1;else return 0;
}
int TuiLi::go_hh()
{
//解皇后問題
int i,c=0;
hh_init();
hh_out();
//回溯根節(jié)點初始值，調(diào)整這個值能調(diào)整回溯進度
hh[0]=1;
hh_out();
i=0;
while(1)
{
if(hh[i]>=0)
{
//回溯點取值在正常范圍內(nèi)
if(ok_hh(i))
{
//如果和剪枝條件沖突，嘗試下一個可用值
hh[i]--;
hh_out();
continue;
}
if(i>=(N*N-1))
{
//已經(jīng)到了最后一個節(jié)點也就是找到了一個解先輸出它
if(ok_hh_sc()){if(c<=100)hh_print();c++;}
//然后嘗試找到其它的解
hh[(N*N-1)]--;
hh_out();
continue;
}
//回溯點值沒有產(chǎn)生沖突擴展他嘗試開始下一個節(jié)點
i++;
hh[i]=1;
hh_out();
}else
{
//超過回溯點取值范圍
//此回溯點已死復位
hh[i]=0;
hh_out();
//退回前一回溯點
i--;
if(i<0)
{
printf("已經(jīng)找出%d皇后問題所有解共有：%d個解！\n",N,c);
printf("\n如果皇后問題解太多的話就只輸出前面100個！\n");
return 1;
}
//嘗試對上一回溯點進行擴展
hh[i]--;
hh_out();
continue;
}
}
return 0;
}