PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadSeqReal(ReadInteger).Select(t->t*0.453592).ToArray;
a.Println; a.Min.Println;
end.
Пример
10
32.6 29.4 30.7 31 29.92 43.4 41.26 42 38.82 40.05
14.7870992 13.3356048 13.9252744 14.061352 13.57147264 19.6858928 18.71520592 19.050864 17.60844144 18.1663596
13.3356048