var   f,g:text;p,b:longint;t,i:integer;
begin
assign(f,'fructe.in');reset(f);
assign(g,'fructe.out');rewrite(g);
readln(f,t);
 for i:=1 to t do
 begin
  readln(f,p,b);
   if b mod 2=1 then writeln(g,'1')
   else writeln(g,'0');
  end;
  close(f);close(g);
  end.