type
  arrayType = array[1..n] of integer;
  array2D = array[1..n] of arrayType;
var
  arr : array2D;
  i, j : integer;
  count : integer;

begin
  for i := 1 to n do for j := 1 to n do readln(arr[i][j]);

  for i := 1 to n do for j := 1 to n do
  begin
   if (arr[i][j] > 0) and (arr[i][j] mod 2 = 0) then count += 1;
  end;

  writeln(count);
end.