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