Составить программу которая формирует массив из 12 случайных чисел от 0 до 40 и выводит на экран чётные элементы массива

begin
  var a:=ArrRandom(12,0,40); a.Println;
  a.Where(t->t.IsEven).Println
end.


19 22 12 20 39 31 23 9 32 7 2 10
22 12 20 32 2 10