題目描述

【問題描述】

小 B 最近迷上了華容道，可是他總是要花很長的時間才能完成一次。於是，他想到用編程來完成華容道：給定一種局面， 華容道是否根本就無法完成，如果能完成， 最少需要多少時間。

小 B 玩的華容道與經典的華容道遊戲略有不同，遊戲規則是這樣的：

1. 在一個 n*m 棋盤上有 n*m 個格子，其中有且只有一個格子是空白的，其余 n*m-1個格子上每個格子上有一個棋子，每個棋子的大小都是 1*1 的；

2. 有些棋子是固定的，有些棋子則是可以移動的；

3. 任何與空白的格子相鄰（有公共的邊）的格子上的棋子都可以移動到空白格子上。

遊戲的目的是把某個指定位置可以活動的棋子移動到目標位置。

給定一個棋盤，遊戲可以玩 q 次，當然，每次棋盤上固定的格子是不會變的， 但是棋盤上空白的格子的初始位置、 指定的可移動的棋子的初始位置和目標位置卻可能不同。第 i 次

玩的時候， 空白的格子在第 EXi 行第 EYi 列，指定的可移動棋子的初始位置為第 SXi 行第 SYi列，目標位置為第 TXi 行第 TYi 列。

假設小 B 每秒鐘能進行一次移動棋子的操作，而其他操作的時間都可以忽略不計。請你告訴小 B 每一次遊戲所需要的最少時間，或者告訴他不可能完成遊戲。

輸入輸出格式

輸入格式：

輸入文件為 puzzle.in。

第一行有 3 個整數，每兩個整數之間用一個空格隔開，依次表示 n、m 和 q；

接下來的 n 行描述一個 n*m 的棋盤，每行有 m 個整數，每兩個整數之間用一個空格隔開，每個整數描述棋盤上一個格子的狀態，0 表示該格子上的棋子是固定的，1 表示該格子上的棋子可以移動或者該格子是空白的。接下來的 q 行，每行包含 6 個整數依次是 EXi、EYi、SXi、SYi、TXi、TYi，每兩個整數之間用一個空格隔開，表示每次遊戲空白格子的位置，指定棋子的初始位置和目標位置。

輸出格式：

輸出文件名為 puzzle.out。

輸出有 q 行，每行包含 1 個整數，表示每次遊戲所需要的最少時間，如果某次遊戲無法完成目標則輸出−1。

輸入輸出樣例

3 4 2
0 1 1 1
0 1 1 0
0 1 0 0
3 2 1 2 2 2
1 2 2 2 3 2

2
-1

說明

【輸入輸出樣例說明】

棋盤上劃叉的格子是固定的，紅色格子是目標位置，圓圈表示棋子，其中綠色圓圈表示目標棋子。

1. 第一次遊戲，空白格子的初始位置是 (3, 2)（圖中空白所示），遊戲的目標是將初始位置在(1, 2)上的棋子（圖中綠色圓圈所代表的棋子）移動到目標位置(2, 2)（圖中紅色的格子）上。

移動過程如下：

2. 第二次遊戲，空白格子的初始位置是（1, 2）（圖中空白所示），遊戲的目標是將初始位置在（2, 2）上的棋子（圖中綠色圓圈所示）移動到目標位置 (3, 2)上。

要將指定塊移入目標位置，必須先將空白塊移入目標位置，空白塊要移動到目標位置，必然是從位置（2， 2）上與當前圖中目標位置上的棋子交換位置，之後能與空白塊交換位置的只有當前圖中目標位置上的那個棋子，因此目標棋子永遠無法走到它的目標位置， 遊戲無

法完成。

【數據範圍】

對於 30%的數據，1 ≤ n, m ≤ 10，q = 1；

對於 60%的數據，1 ≤ n, m ≤ 30，q ≤ 10；

對於 100%的數據，1 ≤ n, m ≤ 30，q ≤ 500。

#include <cstdio>
#include <cstring>
#define MAXN 4000
#define gg(a,b,c)  a*120+b*4+c
#define INF 1e9
int n,m,qq;
int e[20010][3],p[4010],counter=0,ans;
int q[1010][2],dis[35][35],sq[4010],sdis[4010],head,tail;
short vis[4010],map[35][35]/*the chess map*/,dir[4][2] = {-1,0,1,0,0,-1,0,1};//0:x,1:y
template<class T>inline void cin(T&x){
    static char c;static int y;
    for(c=getchar(),x=0,y=1;c<48||57<c;c=getchar())if(c==‘-‘)y=-1;
    for(;48<=c&&c<=57;c=getchar())x=((x+(x<<2))<<1)+(c^‘0‘);
    x*=y;}//an interesing quick_reader
int min(int a,int b){return a<b?a:b;}//just don‘t want to use iostream base
void add_edge(int sn,int fn,int val){e[++counter][0]=fn,e[counter][1]=val,e[counter][2]=p[sn],p[sn]=counter;}//e[c][0]is the before,e[c][2]is the next
void bfs(int si,int sj,int bi,int bj,int id){int i,j,k,ii,jj;
    memset(dis,0,sizeof(dis));head=1; tail=2;//set the used num
    q[1][0]=si,q[1][1]=sj,dis[si][sj]=1;//push the first one to the queue ,and just decide it‘s distance as 1
    while(head!=tail){i=q[head][0],j=q[head++][1];//mark last x and y,and then change the queue‘s head
        for(k=0;k<4;k++){ii=i+dir[k][0],jj=j+dir[k][1];//move around
            if(!map[ii][jj]||(ii==bi&&jj==bj)||dis[ii][jj])continue;//if the chessman can‘t move |or have moved to|or dis has been marked ,just go on
            dis[ii][jj]=dis[i][j]+1,q[tail][0]=ii,q[tail++][1]=jj;//mark the dis,because move from the last x,y ;so the dis is just one more, |and then push it to the queue
        }//if the queue is empty,break
    }if(id==4)return;//step 4,just move from the blank|and this work has done ,just return (blank area can‘t move!!!)
    for(k=0;k<4;k++){i=bi+dir[k][0],j=bj+dir[k][1];//move around
        if((i==si&&j==sj)||!dis[i][j]) continue;//if have moved to|or has not been marked ,just go on
        add_edge(gg(bi,bj,id),gg(bi,bj,k),dis[i][j]-1);//add_edge
    }add_edge(gg(bi,bj,id),gg(si,sj,id^1),1);//the last operation
}
void spfa(int si,int sj){int i,sn,fn,val;memset(sdis,60,sizeof(sdis));head=1;tail=1;//set the used num
    for(i=0;i<4;i++){//move around
        if(!dis[si+dir[i][0]][sj+dir[i][1]]) continue;//if the area move to has not been marked
        sn=gg(si,sj,i);
        sq[tail++]=sn,sdis[sn]=dis[si+dir[i][0]][sj+dir[i][1]]-1,vis[sn]=1;//add the sn into the queue,mark the dis(sdis),and set the been array as true
    }while(head!=tail){sn=sq[head++];//if the queue isn‘t empty,keep going,use a num to mark the sq element
        for(i=p[sn];i;i=e[i][2]){fn=e[i][0],val=e[i][1];//before and val has marked
            if(sdis[fn]<=sdis[sn]+val)continue;//if can‘t make better ,just go on
            sdis[fn]=sdis[sn]+val;//or change the new dis,as better 
            if(vis[fn])continue;//if has visit ,go on
            vis[fn]=1;sq[tail++]=fn;// or ,make it been visited,and push it to the queue sq
            if(tail>MAXN) tail = 1;//if the tail may beyond the array admitted,reset the tail
        }vis[sn]=0;if(head>MAXN)head=1;//as above,and let it not been visited
        }
}
int main(){int i,j,bi,bj,si,sj,fi,fj;cin(n),cin(m),cin(qq);
    for(i=1;i<=n;i++) for(j=1;j<=m;j++) cin(map[i][j]);//above ciner
    for(i=1;i<=n;i++) for(j=1;j<=m;j++){
        if(!map[i][j]) continue;//if this chessman can‘t move,just go on for the next one
        if(map[i-1][j]) bfs(i-1,j,i,j,0);//move above to here step0
        if(map[i+1][j]) bfs(i+1,j,i,j,1);//move down  to here step1
        if(map[i][j-1]) bfs(i,j-1,i,j,2);//move left  to here step2
        if(map[i][j+1]) bfs(i,j+1,i,j,3);//move right to here step3
        //set the first map,add some necessary edge
    }while(qq--){cin(bi),cin(bj),cin(si),cin(sj),cin(fi),cin(fj);//b:blank,s:start,f:finish
        if(si==fi &&sj==fj) { printf("0\n"); continue;}//the wanted is just the given,need no time|the special solution|
        bfs(bi,bj,si,sj,4); /*move blank area to the start step4*/spfa(si,sj);ans=INF;//
        for(i=0;i<4;i++) ans=min(ans,sdis[gg(fi,fj,i)]);
        if(ans<INF) printf("%d\n",ans)/*possible solution*/;else printf("-1\n");/*impossible solution*/}return 0;
}//rubish cpp,note from franzl lang.

代碼實現如上，程序是最好的語言、、

華容道