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

Создать массив из 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

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