回溯法、数独与N阶可达问题（一）

/*************************************************************** 
程序作者：yin
创建日期：2016-2-26 
程序说明：该程序读取同目录下sudoku.txt文件的特定的数独格式，然后
采用回溯法求解，当找到一解后立即返回结束搜索。程序的部分代码参考
自互联网。
************************************************************** */
#include<stdio.h>
#include <ctime>
int result=0; //结果数
int try_times=0;
 int sudoku[9][9];
void solver(int sudoku[9][9],int n);
void read_sudoku()
{
	FILE *fp=fopen("sudoku.txt","r+");
	
		for(int i=0;i<9;i++)
		for(int j=0;j<9;j++)
		{
			char temp=fgetc(fp);
			 if(temp!=‘\n‘)		sudoku[i][j]=temp-48;
			 else			sudoku[i][j]=fgetc(fp)-48;
		} 
	fclose(fp);
}
void show_sudoku(int a[9][9])
{
	printf(" -------------------\n");	
	for(int i=0;i<9;i++)
		{
			printf(" | ");
			for(int j=0;j<9;j++)
			{
				printf("%d",a[i][j]);
				if(j==2 || j==5 || j==8)printf(" | ");
			}
			
			printf("\n");
			if(i==2 || i==5 || i==8)printf(" -------------------\n");	
		}
}


//判断是否可以将第i行、第j列的数设为k
bool check(int sudoku[9][9],int i,int j,int k)
{
 int m,n;
 //判断行
 for(n=0;n<9;n++)
 {
  if(sudoku[i][n] == k)
   return false;
 }
 //判断列
 for(m=0;m<9;m++)
 {
  if(sudoku[m][j] == k)
   return false;
 }
 //判断所在小九宫格
 int t1=(i/3)*3,t2=(j/3)*3;
 for(m=t1;m<t1+3;m++)
 {
  for(n=t2;n<t2+3;n++)
  {
   if(sudoku[m][n] == k)
    return false;
  }
 }
 //可行，返回true
 return true;
}
//数独求解函数
void solver(int sudoku[9][9],int n)
{if(result==1) return;
 int temp[9][9];
 int i,j;
 for(i=0;i<9;i++)
  for(j=0;j<9;j++)
   temp[i][j]=sudoku[i][j];

 i=n/9; j=n%9; //求出第n个数的行数和列数
 //若可以后移，就后移一个格子，若不能程序结束 
 if(sudoku[i][j] != 0)
 {
  if(n == 80)//递归退出点 
	{
		result++;
		 printf(" 数独的解为：\a\n");
		show_sudoku(temp);
	}
  else    solver(temp,n+1); 
 } 
 else    //空各格子 
 {
  for(int k=1;k<=9;k++)
  {
   bool flag=check(temp,i,j,k);
   if(flag) //第i行、第j列可以是k
   {
 	//------------------------------------
 	try_times++;	
	//------------------------------------	  
    temp[i][j]=k; //设为k
    
    //若可以后移，就后移一个格子，若不能程序结束 
    if(n == 80) //递归退出点
	{
		result++;
		 printf(" 数独的解为：\a\n");
		show_sudoku(temp);
	}
    else		solver(temp,n+1);

    temp[i][j]=0; //回溯擦除这个错误 
   }
  }
  //退层点
 }

}
int main()
{
 time_t start,end; 
 start=clock();
 
	//读显数独题目
	read_sudoku();
	show_sudoku(sudoku);
	//按照一定的顺序，一个一个地处理格子
	solver(sudoku,0); 
	  if(result==0)	printf("此数独无解!\a");

 end=clock(); 
printf("------------------------------------------------------------------------\n");
printf("total run time :%10dms\n",end-start);
printf("        共尝试：%10ld次\n",try_times);
printf("------------------------------------------------------------------------\n");
 getchar(); 
 return 0;
}