eval"N,*L,K="+`dd`.split*?,
p -(0.0..M=L.sum).bsearch{|i|L.map{|l|l.div M-i}.sum>=K}+M