Cod sursa(job #124905)

Utilizator raduzerRadu Zernoveanu raduzer Data 20 ianuarie 2008 10:07:09
Problema Fructe Scor 100
Compilator fpc Status done
Runda preONI 2008, Runda 3, Clasele 5-8 Marime 0.33 kb
var p,b,t,i:longint;

begin
     assign(input,'fructe.in');
     reset(input);
     assign(output,'fructe.out');
     rewrite(output);
     readln(t);
     for i:=1 to t do
     begin
          readln(p,b);
          if (b mod 2=1) then writeln(1);
          if (b mod 2=0) then writeln(0);
     end;
close(output);
end.