<>;@a=???$_:sort{$b<=>$a}map{int eval}<{$a[0],$a[-1]}{,-,\\*,/}+$_>for glob<>;printf@a