Question

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

Answer 1

// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программа не работает, обновите версию!

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