double rd(double h)
{
double h100=h*100;
if (h100-floor(h100)>=0.5) h100=(floor(h100)+1)/100;
else h100=(floor(h100))/100;
return h100;
}