Водномерном массиве их 17 случайных целых чисел из промежутка [5: 25]найдите наименьший из нечётных элементов

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

begin
  var a:=ArrRandom(17,5,25); a.Println;
  Writeln('Min=',a.Where(t->t.IsOdd).Min)
end.

Пример
22 25 8 13 14 8 22 7 9 21 7 6 7 15 17 20 16
Min=7

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

begin
var a:= ArrRandom(17,5,25);
a.Println;
Writeln(a.Where(t -> t.isOdd).Min);
end.