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

kri2221 kri2221    3   03.09.2019 02:40    0

Ответы
мопс73 мопс73  06.10.2020 13:44
// 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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика