read -d! n k a
for a in $a;{((a>k?c+=a:0))||b[++m,a]+=\ $a;}
b=(${b[@]})
'm-->0?b[m--]+_:c-~n%2>>1'
echo $[_]