填字游戏（回溯）

/**
 * function:填字游戏。在3x3个方格的方阵中药填入数字1~N（N>=10）
 *          内的某9个数字，每个方格填一个整数，要求所有相邻两个
 *          方格内的两个整数之和为质数。试求出所有满足这个要求
 *          的各种数字填法。
 * author:顾博君
 * time:2013-1-26
 */
#include <stdio.h>
#include <windows.h>
#define N 12
void write(int a[]){//打印结果
    int i,j;
    for(i=0;i<3;i++){
        for(j=0;j<3;j++){
            printf("%3d",a[3*i+j]);
        }
        printf("\n");
    }
    scanf("%*c");//暂停
    system("cls");//清屏
}
int b[N+1];
int a[10];
int isprime(int m){
    int i;
    if(m==1||(m>2&&m%2==0))return 0;//除2以外的偶数和1一定不是质数
    for(i=3;i*i<=m;i+=2)if(m%i==0)return 0;//判断奇数
    return 1;
}
//位置0不需要任何比较， 位置1只需与位置0比较，  位置2只需与位置1比较，
//位置3只需与位置0比较，位置4需要与位置1,3比较，位置5需要与位置2,3比较，
//位置3只需与位置3比较，位置4需要与位置4,6比较，位置5需要与位置5,7比较。
int checkmatrix[][3]={{-1   },{0,-1   },{1,-1   },
                      { 0,-1},{1, 3,-1},{2, 4,-1},
                      { 3,-1},{4, 6,-1},{5, 7,-1}};
int selectnum(int start){
    int i;
    for(i=start;i<=N;i++){//从start这个数开始，向下寻找是否有没有使用过的数字
        if(b[i])return i;//如果还有没有使用过的数字，返回这个数字
    }
    return 0;//否则返回0
}
int check(int pos){//检查是否满足和为质数
    int i,j;
    if(pos<0)return 0;//如果位置小于0，返回0
    for(i=0;(j=checkmatrix[pos][i])>=0;i++){
        if(!isprime(a[pos]+a[j]))//和不为质数，返回0
            return 0;
    }
    return 1;
}
int extend(int pos){//填写下一个位置
    a[++pos]=selectnum(1);//填写
    b[a[pos]]=0;//被使用的数字做上标记
    return pos;//返回新的位置
}
int change(int pos){//改变数字
    int j;
    //从pos位置的数字加1开始选择，如果已经没有可以使用的数字了，回溯
    while(pos>=0&&(j=selectnum(a[pos]+1))==0)
        b[a[pos--]]=1;//该数字标记为未被使用
    if(pos<0)return -1;
    b[a[pos]]=1;//把pos位置原来的数字标记为未被使用
    a[pos]=j;//pos位置放上新的数字
    b[j]=0;//pos位置上的数字标记为已使用
    return pos;//返回新的位置
}
void find(){
    int ok=0,pos=0,count=0;
    a[pos]=0;
    b[a[pos]]=0;
    do{
        if(ok){//如果符合条件
            if(pos==8){
                count++;
                printf("\n%d:\n",count);
                write(a);//打印结果

                pos=change(pos);//改变数字
            }
            else pos=extend(pos);//填写下一个位置
        }
        else pos=change(pos);//如果不满足条件，改变数字
        ok=check(pos);//检查是否满足和为质数
    }while(pos>=0);
}
int main(){
    int i;
    //数字标记变量初始化
    for(i=1;i<=N;i++){
        b[i]=1;//标记为未使用
    }
    find();
}