>>57
f:=method(v,u:=v sort;list(v map(**2)sum sqrt,(u removeLast**2+u sum**2)sqrt))

Io> f(list(1,2,3))
==> list(3.7416573867739413, 4.2426406871192848)
Io> f(list(5,6,7))
==> list(10.488088481701515, 13.038404810405298)
Io> f(list(3,1,2))
==> list(3.7416573867739413, 4.2426406871192848)