Cod sursa(job #124896)

Utilizator crisy_girlpop cristina crisy_girl Data 20 ianuarie 2008 10:01:05
Problema Fructe Scor 0
Compilator fpc Status done
Runda preONI 2008, Runda 3, Clasele 5-8 Marime 0.31 kb
Raporteaza aceasta sursa 
var
	n,i:word;
  p,b:longint;
begin
	readln(n);
  for i:= 1 to n do
  	begin
    	readln(p,b);
      p:=(p div 2) +(b div 2)+(p mod 2);
      b:=b mod 2;
      repeat
      	p:=(p div 2)+(p mod 2);
      until p div 2 =  0;
      if b<>0 then
      	writeln(1)
      else
      	writeln(0);
    end;
end.