use bignum p,-10;$x=0/<>;$x+=$_ for<>;printf$x||'%.10f'