状态: Unaccepted

测评机： Xeond[6]

得分： 0分

提交日期： 2013-3-15 20:23:00

有效耗时： 该状态没有记录

测试结果1: 运行错误|未定义错误编号|错误编号:106

测试结果2: 运行错误|未定义错误编号|错误编号:106

测试结果3: 运行错误|未定义错误编号|错误编号:106

测试结果4: 运行错误|未定义错误编号|错误编号:106

测试结果5: 运行错误|未定义错误编号|错误编号:106

测试结果6: 运行错误|未定义错误编号|错误编号:106

测试结果7: 运行错误|未定义错误编号|错误编号:106

测试结果8: 运行错误|未定义错误编号|错误编号:106

测试结果9: 运行错误|未定义错误编号|错误编号:106

测试结果10: 运行错误|未定义错误编号|错误编号:106

01.

const dx:array[1..2]of longint=(1,0);

02.

dy:array[1..2]of longint=(0,1);

03.

mdx:array[1..8]of longint=(1,-1,2,-2,0,0,0,0);

04.

mdy:array[1..8]of longint=(0,0,0,0,1,-1,2,-2);

05.

var i,j,m,n,k,l,q,w,s,m1,n1:longint;

06.

a:array[0..10000]of longint;

07.

f:array[0..10000,0..10000]of boolean;

08.

procedure dfs(x,y:longint);

09.

var i,j:longint;

10.

begin

11.

if (x=m)and(y=n) then begin

12.

inc(s);

13.

exit;

14.

end;

15.

for i:=1 to 2 do

16.

begin

17.

k:=x+dx[i];

18.

l:=y+dy[i];

19.

if (k<8)and(l<4) then

20.

if f[k,l]=false then

21.

begin

22.

f[k,l]:=true;

23.

dfs(k,l);

24.

f[k,l]:=false;

25.

end;

26.

end;

27.

end;

28.

29.

begin

30.

read(m,n);

31.

read(m1,n1);

32.

for i:=1 to 8 do

33.

begin

34.

q:=m1+mdx[i];

35.

w:=n1+mdy[i];

36.

f[q,w]:=true;

37.

end;

38.

dfs(m,n);

39.

write(s);

40.

end.