read l read n a=(`tr ' ' '\n' | sort -n`) c=0 for x in ${a[@]} do if((l