var

 a, b, c, cnt: Integer;

begin

 cnt := 0;

 Write('a = ');

 Read(a);

 Write('b = ');

 Read(b);

 Write('c = ');

 Read(c);

 if (a > 0) and (a mod 2 = 1) then

   Inc(cnt);

 if (b > 0) and (b mod 2 = 1) then

   Inc(cnt);

 if (c > 0) and (c mod 2 = 1) then

   Inc(cnt);

 WriteLn(cnt)

end.