Массив задан датчиком случайных чисел на интервале [-37, 66]. Найти наименьший нечетный элемент. Размер произвольный.

begin
  var a:=ArrRandom(ReadInteger('n='),-37,66); a.Println;
  Writeln('Минимальный нечетный: ',a.Where(m->m.IsOdd).Min)
end.


n= 15
-9 -25 -31 -27 11 -32 36 -6 44 -26 -22 11 48 43 29
Минимальный нечетный: -31