supertable - 2010/10/26 21:32:00
好吧。。咱是刚开始学PASCAL的新手（拓展课）之前都没啥问题。。现在卡了一道题。。求解。。。
题目：一小球从100米处落下，每次弹起原来一半的高度。。要求输入弹地的次数。输出球经过的总距离（最后一次碰地后弹起的距离不算）。。
恩。。就这样。。。求解。。。
看看会不会又是水羊第一个给答案= =
。啦啦啦。。。。
水羊 - 2010/10/26 22:16:00
http://wenwen.soso.com/z/q210338113.htmprogram pp(input,output);
var
i:integer;
sum,k:real;
begin
k:=50;
sum=100;
for i:=1 to 19do
begin
sum:=sum+2*k;
k:=k / 2;
end;
write(sum);
end.
好像一开始的错了。这个是对的。忘了路程是两倍了。
=====================================
好吧.....我無力了......
網路上沒有......OTL
004307ec - 2010/10/26 23:18:00
（参考数学等比数列
S(n) = 100 * 2 ^ (n-1)
纯粹是数学问题，手算完毕就是上面的式子，对于n = 1 也成立。