Создать массив из 10 случайных элементов целочисленного типа . Вывести его на экран. Найти сумму всех четных элементов этого массива. Найти количество элементов больших 25

//PascalABC.NET 3.3

begin
 var a:=ArrRandom(10,1,100); a.Println;
 writeln('s = ',a.Where(x->x mod 2=0).Sum);
 writeln('k = ',a.Where(x->x>25).Count);
end. 

Пример:
17 61 20 13 34 14 83 13 12 96
s = 176
k = 4

Оцени ответ
Не нашёл ответ?

Если тебя не устраивает ответ или его нет, то попробуй воспользоваться поиском на сайте и найти похожие ответы по предмету Информатика.

Найти другие ответы

Загрузить картинку
© Задачки.net