Cod sursa(job #125416)

Utilizator GavrilaVladGavrila Vlad GavrilaVlad Data 20 ianuarie 2008 12:50:36
Problema Fructe Scor 100
Compilator fpc Status done
Runda preONI 2008, Runda 3, Clasele 5-8 Marime 0.25 kb
Raporteaza aceasta sursa 
var n,i,a,b:longint;
    f,t:text;
begin
   assign(f,'fructe.in');
   assign(t,'fructe.out');
   reset(f);
   rewrite(t);
   read(f,n);
   for i:=1 to n do
   begin
   read(f,a,b);
   writeln(t,b mod 2);
   end;
   close(f);
   close(t);
end.