codeves天梯 过河卒

如图，A 点有一个过河卒，需要走到目标 B 点。卒行走规则：可以向下、或者向右。同时在棋盘上的任一点有一个对方的马（如上图的C点），该马所在的点和所有跳跃一步可达的点称为对方马的控制点。例如上图 C 点上的马可以控制 9 个点（图中的P1，P2 … P8 和 C）。卒不能通过对方马的控制点。

　　棋盘用坐标表示，A 点（0，0）、B 点（n,m）(n,m 为不超过 20 的整数，并由键盘输入)，同样马的位置坐标是需要给出的（约定: C不等于A，同时C不等于B）。现在要求你计算出卒从 A 点能够到达 B 点的路径的条数。

1<=n,m<=15

分析：超典型搜索题==。

const
  maxn=20;
  dx:array [1..9] of longint=(0,2,1,2,1,-2,-1,-2,-1);
  dy:array [1..9] of longint=(0,1,2,-1,-2,1,2,-1,-2);

var
  a,g:array [0..maxn,0..maxn] of int64;
  n,m:longint;

procedure init;
var
  i,j,x,y:longint;
begin
  readln(n,m,x,y);
  fillchar(a,sizeof(a),0);
  fillchar(g,sizeof(g),0);
  for i:=1 to 9 do
    if (x+dx[i]<=n) and (x+dx[i]>=0) and (y+dy[i]<=m) and (y+dy[i]>=0) then
    begin
      g[x+dx[i],y+dy[i]]:=1;
      a[x+dx[i],y+dy[i]]:=0;
    end;
end;

procedure search(x,y:longint);
begin
  if (x=0) and (y=0)
    then  begin
            a[x,y]:=1;
            exit;
          end;

  if (x=0) and (y<>0) and (g[x,y]=0)
    then begin
           search(x,y-1);
           a[x,y]:=a[x,y-1];
         end;
  if (x<>0) and (y=0) and (g[x,y]=0)
    then begin
           search(x-1,y);
           a[x,y]:=a[x-1,y];
         end;
  if (x<>0) and (y<>0) and (g[x,y]=0)
    then begin
           if (g[x-1,y]=0) and (a[x-1,y]=0) then search(x-1,y);
           if (g[x,y-1]=0) and (a[x,y-1]=0) then search(x,y-1);
           a[x,y]:=a[x-1,y]+a[x,y-1];
         end;
end;

begin
  init;
  search(n,m);
  write(a[n,m]);
end.