题解 Mayan游戏

@luogu

---

搜索剪枝题，每一次暴力下落，暴力消除

#include<cstdio>
#include<cstring>
#include<algorithm>
#define N 10
#define ll long long
#define max(x,y) ((x)>(y) ? (x) : (y))
#define min(x,y) ((x)<(y) ? (x) : (y))
using namespace std;

inline int getint() {
    int t=0,p;
    char ch=getchar();
    for(;ch!='-' && !(ch>='0' && ch<='9');ch=getchar());
    if(ch=='-') p=-1,ch=getchar();
    else p=1;
    for(;ch>='0' && ch<='9';ch=getchar()) {
        t=t*10+ch-48;
    }
    return t*p;
}

int n,a[8][N];

inline void fall() {
    bool flag;
    do {
        flag=false;
        for(register int i=1;i<=5;i++) {
            for(register int j=2;j<=7;j++) if(a[i][j] && !a[i][j-1]) {
                a[i][j-1]=a[i][j];a[i][j]=0;flag=true;
            }
        }
    } while(flag);
}

bool f[8][N];

inline bool check() {
    memset(f,false,sizeof f);
    bool flag=false;
    for(int i=1;i<=5;i++) {
        for(register int j=1;j<=7;j++) if(a[i][j]) {
            if(a[i-1][j]!=0 && a[i-1][j]==a[i][j] && a[i][j]==a[i+1][j]) {
                f[i-1][j]=f[i][j]=f[i+1][j]=true;
            }
            if(a[i][j-1]!=0 && a[i][j]==a[i][j-1] && a[i][j]==a[i][j+1]) {
                f[i][j-1]=f[i][j+1]=f[i][j]=true;
            }
        }
    }
    for(int i=1;i<=5;i++) {
        for(register int j=1;j<=7;j++) {
            if(f[i][j]) a[i][j]=0,flag=true;
        }
    }
    return flag;
}

struct Node {
    int x,y,z;
} ans[N];

bool flag;

//void debug(int x,int y,int t) {
//  if(t==n-1 && x==4 && y==2) {
//      for(int i=1;i<=5;i++) {
//          for(int j=1;j<=7;j++) {
//              printf("%d ",a[i][j]);
//          }
//          printf("\n");
//      }
//  }
//}

void dfs(int t) {
    if(flag) return;
    if(t==0) {
        flag=true;
        for(int i=1;i<=5;i++) {
            if(a[i][1]!=0) {flag=false;break;}
        }
        return;
    }
    for(int i=1;i<=5;i++) {
        for(int j=1;a[i][j];j++) {
            if(i!=5 && a[i][j]!=a[i+1][j] && a[i][j]) {   //剪枝
                int b[8][N];
                memcpy(b,a,sizeof a);
                swap(a[i][j],a[i+1][j]);
                ans[n-t+1]=(Node){i-1,j-1,1};
                fall();
                while(check()) fall();
                dfs(t-1);
                memcpy(a,b,sizeof a);
                if(flag) return;
            }
            if(i!=1 && a[i][j] && a[i-1][j]==0) {       //剪枝
                int b[8][N];
                memcpy(b,a,sizeof a);
                swap(a[i][j],a[i-1][j]);
                ans[n-t+1]=(Node){i-1,j-1,-1};
                fall();
                while(check()) fall();
                dfs(t-1);
                memcpy(a,b,sizeof a);
                if(flag) return;
            }
        }
    }
}

int main() {
//  freopen("mayan.in","r",stdin);
//  freopen("mayan.out","w",stdout);
    n=getint();
    memset(a,0,sizeof a);
    for(int i=1;i<=5;i++) {
        int D=getint();int j=1;
        while(D) {a[i][j++]=D;D=getint();}
    }
    dfs(n);
    if(flag) {
        for(int i=1;i<=n;i++) {
            printf("%d %d %d\n",ans[i].x,ans[i].y,ans[i].z);
        }
    } else {
        printf("-1\n");
    }
    return 0;
}