<>;print+($a[(@a=sort{$a-$b}glob<>)/2]+$a[$#a/2])/2