N,B,*A=gets(p).split.map &:to_f
d=i=0;A.map{|a|d+=a*B**a/B;i+=a==-1?Math.log(B):B**a*B/(a+1)}
p d,i