Составить программу. Создать массив из 10 элементов случайным образом, найти сумму четных чисел.
begin
var a := ArrRandom(10, -50, 50);
a.Println;
a.Where(t -> t.IsEven).Sum.Println
end.