var f,g:text;   
    i,t,p,b:longint;   
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,b,p);   
     if b mod 2=1 then writeln(g,'0')   
     else writeln(g,'1');   
end;   
 close(f);close(g);   
 end.