>>330
それなら>>322の方針にしたがって
　
　An=1-納i=1,n]C[n,i](-1)^i(1-p)^i/(1-(1-p)^i)
　
と直接計算したほうがいいと思う。