弹球距离
解法一
double dist(double h, double p)
{
double sum=h, rh, temp=0;
rh = p * h;
while(rh>TOL)
{
temp = 2 * rh;
sum += temp;
h = rh;
rh = p * h;
}
return sum;
}
解法二
double dist(double h, double p)
{
double rh = p * h;
if(rh<TOL)
{
return h;
}
return h + rh + dist(rh, p);
}```