var fi,fo:text;
    t,i,p,b:longint;
begin
  assign(fi,'fructe.in'); reset(fi);
  assign(fo,'fructe.out'); rewrite(fo);
  read(fi,t);
  for i:=1 to t do
    begin
      read(fi,p,b);
      if p>b then
        if p and 1=1 then writeln(fo,'1')
                     else writeln(fo,'0')
      else
        if b and 1=1 then writeln(fo,'1')
                     else writeln(fo,'0');
    end;
  close(fi);
  close(fo);
end.