{ll@n,a[1d3];rd(a(n));sortA(n,a);wt((a[n/2]+a[~-n/2])*.5);}