program kabe;

var
lr, lv, lp, sr, sv, sp, ls, ss, arv, kk, k1, k2, st, kv: integer;

begin
 writeln('See programm arvutab kabe laual tehtud k„ikude arvu.');
 writeln('Sisesta l„htepositsiooni veeru number.');
 readln(lv);
 writeln('Rea number.');
 readln(lr);
 writeln('Nd j„rjest sihtpunkti veeru ja rea number.');
 readln(sv);
 readln(sr);
 kk:=8-lv;
 k1:=lv-kk;
 k2:=lv+kk;
 ls:=lv-lr;
 ss:=sv-sr;
 lp:=lr+lv;
 sp:=sr+sv;
 st:=sr-sv;
 if ((lr<sr) and (lv<=sv) and (ls>=ss)) then
 arv:=sr-lr
 else
 if ((lr<sr) and (lv>sv) and (lp>=sp)) then
 arv:=sr-lr
 else
 if (lr>=sr) then
 begin
  if ((sr=1) and ((sv=3) or (sv=5) or (sv=7))) then
  arv:=8-lr+2
  else
  if (((sr=2) and ((sv=4) or (sv=6)))) then
  arv:=8-lr+2
  else
  if ((sr=3) and (sv=5)) then
  arv:=8-lr+2
 end;
 if (arv=0) then
  begin
   if (ss=0) then kv:=8
   else
   if ((ss=2) or (sp=14)) then kv:=6
   else
   if ((ss=4) or (sp=12)) then kv:=4
   else
   if ((ss=6) or (sp=10)) then kv:=2;
   if ((kv>=k1) and (kv<=k2)) then
   arv:=8-lr+1
   else
   arv:=8-lr+2;
  end;
 writeln('K„ike oli  kokku',arv);
end.