1массив из 11 целых чисел формируется случайным образом в интервале от 5 до 45.найти сумму четных элементов массива . 2 сформировать массив из 5 целых чисел (ввод с клавиатуры ),уменьшить каждый элемент в три раза .

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

1)

begin
var a:=ArrRandom(11,5,45).Println;
var x:= a.where(t -> t.IsEven).sum;
Writeln('Сумма четных элементов: ', x);
end.

2)

begin
var a:= ArrGen(5, t -> ReadReal).Println;
a:= a.Select(t ->t/3).ToArray.Println;
end.