Cod sursa(job #176690)

Utilizator Tase_CCapalna Tanase Tase_C Data 11 aprilie 2008 16:00:25
Problema Fructe Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
var t,i,p,b:longint;
begin
assign(input,'fructe.in');reset(input);
assign(output,'fructe.out');rewrite(output);
read(t);
 for t:=1 to t do begin
  read(p,b);
  writeln(b mod 2);
 end;
close(input);close(output);
end.