记录编号	79470	评测结果	AAAAAAAAAA
题目名称	迷宫	最终得分	100
用户昵称	TA	是否通过	通过
代码语言	Pascal	运行时间	0.000 s
提交时间	2013-11-05 19:59:58	内存使用	0.00 MiB

type
 ff=array[1..5,1..5] of boolean;
var
 n,m,t,sx,sy,fx,fy,i,tx,ty:shortint;
 f:ff;
 ans:qword;
procedure dfs(f:ff;x,y:shortint);
 begin
  if (x=fx) and (y=fy) then
    inc(ans)
   else
    begin
     f[x,y]:=false;
     if x<>1 then
       if f[x-1,y] then
         dfs(f,x-1,y);
     if x<>n then
       if f[x+1,y] then
         dfs(f,x+1,y);
     if y<>1 then
       if f[x,y-1] then
         dfs(f,x,y-1);
     if y<>m then
       if f[x,y+1] then
         dfs(f,x,y+1);
    end;
 end;
begin
 assign(input,'maze.in');
 assign(output,'maze.out');
 reset(input);
 rewrite(output);
 //while not(eof) do
  //begin
   readln(n,m,t);
   readln(sx,sy,fx,fy);
   fillchar(f,sizeof(f),true);
   f[sx,sy]:=false;
   ans:=0;
   for i:=1 to t do
    begin
     readln(tx,ty);
     f[tx,ty]:=false;
    end;
   dfs(f,sx,sy);
   writeln(ans);
  //end;
 close(input);
 close(output);
end.