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.
Пример1032.6 29.4 30.7 31 29.92 43.4 41.26 42 38.82 40.0514.7870992 13.3356048 13.9252744 14.061352 13.57147264 19.6858928 18.71520592 19.050864 17.60844144 18.166359613.3356048