3000*（1/2）^n<5n=10 a=1Do if 3000*(1/2)^a>5 then a=a+1 End ifprent nend大概是这样的 算法部分 忘了差不多了 希望对您有帮助
十天会小于五米。是2.9296875
10天
