program bif;
var a,b,c,d:integer;  i:real;
begin
readln (a,b);
c:=((b-a)+1) mod 2;

if c=0 then i:=((b-a+1)/2) else
 begin
  i:=((b-a) div 2)+1;
  d:=b mod 2;
  if d=0 then i:=i-1;
 end;
if a=b then i:=1;
writeln (i);
readln;
end.