дан массив А(3;4) найти количество четных элементов среди них

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(3,4,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Кол-во четных равно ',
      a.Rows.SelectMany(x->x).Where(x->x.IsEven).Count)
end.


*** Исходный массив ***
  42 -55  64  58
  62 -95 -40  20
   8  55 -87  45
----------------
Кол-во четных равно 7