var

n, m, br, i : integer;

function parneCifre(n : integer) : integer;

var

b : integer;

begin

b := 0;

while (n > 0) do

if (n mod 10) mod 2 = 0 then b := b + 1;

parneCifre := b;

end;

begin

Assign(f,'brojevi.in'); Assign(g,'brojevi.out');

Reset(f); Rewrite(g);

Read(f,n); br := 0;

for i := 1 to n do

begin

Read(f, m);

br := br + parneCifre(m);

end;

WriteLn(g,br);

Close(f); Close(g);

end.