Cod sursa(job #124905)
Utilizator | 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.