Подсчитать сумму всех элементов кратных 2 , в массиве из 10 чисел

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016 // Внимание! Если программа не работает, обновите её версию! begin   var a:=ArrRandom(10,1,30); a.Println;   Writeln('Сумма четных чисел равна ',a.Where(x->x.IsEven).Sum) end. Пример 27 11 27 26 20 17 26 20 3 25 Сумма четных чисел равна 92