var f,g:text;
    n,p,b,i:longint;
begin
     assign(f,'fructe.in');
     assign(g,'fructe.out');
     reset(f);
     rewrite(g);
{-rezolvarea problemei------------------------------}
     read(f,n);
     for i:=1 to n do
     begin
          readln(f,p,b);
          if p=b then writeln(g,'1');
          if b mod 2=1 then writeln(g,'1');
          if b mod 2=0  then writeln(g,'0');
     end;

{----------------------------------------------------}
     close(g);
     close(f);end.