原来才74行嘛。。。优美+1

真爽！！！！！！

这个题分类太细了，感觉脑子都长草了。。。还好，在我的精心调教下还是通过了。
题目写的要求还是不太详细，容易误解.
其次就是数据量太小，我还以为会很大呢，废老鼻子劲儿了

我的语文是怎么学的....题目死活读不懂...

被数据虐死了= =

sort好用啊

/擦汗，这什么无语题，AC写成P。。

回复 @猜猜我是谁小�� :
啊啊

/擦汗，在WAN次之后。。我终于发现原来是从1900年开始的。。可是1990年开始竟然也能对3个点。。/擦汗，真是神奇的巧合！

原来这么简单……一个SPFA的事……矮油我了个去……

goodkill！其实代码还是挺优美的……
这是我的题解

Gray Code

回复 @noip :
ACM系列比赛的格式，单个数据文件中包含多组数据，采用标准输入输出

回复 @cstdio :
就一个点什么神奇的情况

splay真好玩蛤蛤蛤（不过目测考试的时候写不出来）……

回复 @龙行天下 :
评论时选中“允许查看你提交的代码”，就可以让别人看到你的代码了（就是评论底部中间的那个圆形图标）

怎么写题的时候出现了一个奇奇怪怪的问题，然后奇奇怪怪地就过了

终于过了，简直艰难______________同楼上，这代码几乎是背会的

program pj024;
const
dx: array[1 .. 8] of Shortint = (-2, -1, 1, 2, 2, 1, -1, -2);
dy: array[1 .. 8] of Shortint = (1, 2, 2, 1, -1, -2, -2, -1);
var
n, m, x, y, i, j: Byte;
g: array[0 .. 20, 0 .. 20] of Byte;
f: array[0 .. 20, 0 .. 20] of Comp;
begin
assign(input,'pj024.in');
assign(output,'pj024.out');
reset(input);
rewrite(output);
Readln(n, m, x, y);
Fillchar(g, Sizeof(g), 0);
g[x, y] := 1;
for i := 1 to 8 do
if (x + dx[i] >= 0) and (x + dx[i] <= n) and
(y + dy[i] >= 0) and (y + dy[i] <= m) then
g[x + dx[i], y + dy[i]] := 1;
f[0, 0] := 1;
for i := 1 to n do
if g[i, 0] = 0 then f[i, 0] := f[i - 1, 0];
for i := 1 to m do
if g[0, i] = 0 then f[0, i] := f[0, i - 1];
for i := 1 to n do
for j := 1 to m do
if g[i, j] = 0 then f[i, j] := f[i - 1, j] + f[i, j - 1];
Writeln(f[n, m]:0:0);
close(input);
close(output);
end.

-1 -1 -1 神坑测试数据