@_=sort{$a-$b}glob<>;$x+=$_[$_]for 1..4;printf"%.2f",$x/4