Одномерный массив а(15) заполнен случайным образом в интервале(-15,20). получить массив в таким образом, чтобы его элементами были нечётные элементы массива а

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

begin
  var a:=ArrRandom(15,-15,20); a.Println;
  var b:=a.Where(t->t.IsOdd).ToArray; b.Println
end.

Пример
-5 17 0 6 -3 10 -5 18 1 15 3 18 -1 -1 12
-5 17 -3 -5 1 15 3 -1 -1