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

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