PAT2.7 弹球距离
double dist( double h, double p ){
double dis = 0; // 记录总路程
if (h<TOL) return h; // 如果小于h,小球只弹一次
while(h>=TOL){
dis = dis+h;
h = h*p;
if(h>=TOL) dis = dis+h;
}
return dis;
}
double dist( double h, double p ){
double dis = 0; // 记录总路程
if (h<TOL) return h; // 如果小于h,小球只弹一次
while(h>=TOL){
dis = dis+h;
h = h*p;
if(h>=TOL) dis = dis+h;
}
return dis;
}