记录编号 114157 评测结果 AAAAAAAAAA
题目名称 跳马问题 最终得分 100
用户昵称 Gravatar 是否通过 通过
代码语言 Pascal 运行时间 0.001 s
提交时间 2014-07-27 16:21:55 内存使用 0.17 MiB
显示代码纯文本
var
  a:array[-1..30,-1..30]of longint;
  i,j,m,n:longint;
begin
  assign(input,'horse.in');
  assign(output,'horse.out');
  reset(input);
  rewrite(output);
  readln(m,n);
  a[1,1]:=1;
  for i:=2 to n do
    for j:=1 to m do
      a[i,j]:=a[i-1,j-2]+a[i-1,j+2]+a[i-2,j-1]+a[i-2,j+1];
  writeln(a[n,m]);
  close(input);
  close(output);
end.