Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Массив состоит из 10 элементов. найти сумму элементов массива и количество четных элементов

Ответ оставил Гость

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=ArrRandom(10,-5,15); a.Println;
  Writeln(Сумма элементов ,a.Sum);
  Writeln(Количество четных элементов ,a.Where(x->x.IsEven).Count)
end.

Тестовое решение:
-3 4 10 1 2 6 8 7 10 14
Сумма элементов 59
Количество четных элементов 7