Дан массив а, состоящий из 19 элементов. числа выбираются случайным образом из промежутка [-23; 23]. вычислить сумму четных элементов данного массива.

begin

var a:=ArrRandom(19,-23,23); a.Println;
var k:=a.Where(t->t mod 2 =0).Sum;
println('');
println(k);
end.