题意：

在一个n m 格子的棋盘上，有一只国际象棋的骑士在棋盘的左下角 (1;1)(如图1)，骑士只能根据象棋的规则进行移动，要么横向跳动一格纵向跳动两格，要么纵向跳动一格横向跳动两格。 例如， n=4，m=3 时，若骑士在格子(2;1) (如图2), 则骑士只能移入下面格子：(1;3),(3;3) 或 (4;2)；对于给定正整数n，m，I，j值 (m,n<=50,I<=n,j<=m) ，你要测算出从初始位置(1;1) 到格子(i;j)最少需要多少次移动。如果不可能到达目标位置，则输出”NEVER”。

Input

输入文件的第一行为两个整数n与m，第二行为两个整数i与j。

Output

输出文件仅包含一个整数为初始位置(1;1) 到格子(i;j)最少移动次数。

Sample Input

5 3
1 2
Sample Output

3

分析：

此题用广搜。

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

var
  a:array[-1..50*50+2,-1..50*50+2] of longint;
  state:array[1..50*50,1..3] of longint;
  father:array[1..50*50] of longint;
  i,j,n,m,max:longint;

procedure init;
begin
  read(n,m);
  readln(i,j);
  a[1,1]:=1;
end;

procedure print;
begin
  if max=0 then write(‘NEVER’)
           else write(state[max,3]);
end;

function check(x,y:longint):boolean;
begin
  check:=true;
  if a[x,y]=1 then check:=false;
  if (x<1) or (x>m) or (y<1) or (y>n) then check:=false;
end;

procedure bfs;
var
 head,tail,k:longint;
begin
 head:=0;
 tail:=1;
 state[1,1]:=1;state[1,2]:=1;
 father[1]:=0;
  repeat
  inc(head);
    for k:=1 to 8 do
    if check(state[head,1]+dx[k],state[head,2]+dy[k])
        then begin
               inc(tail);
               father[tail]:=head;
               state[tail,1]:=state[head,1]+dx[k];
               state[tail,2]:=state[head,2]+dy[k];
               a[state[tail,1],state[tail,2]]:=1;
               state[tail,3]:=state[head,3]+1;
               if (state[tail,1]=i)and(state[tail,2]=j)
                 then begin
                        max:=tail;
                        tail:=0;
                      end;
             end;
  until head>=tail;
end;

begin
  init;
  bfs;
  print;
end.