小玉在游泳
題意
已知小玉第一步能游2米,可是隨著越來越累,力氣越來越小,她接下來的每一步都只能游出上一步距離的98%。現在小玉想知道,如果要游到距離x米的地方,她需要游多少步呢。
var
n,t,w:real;
c:longint;
begin
? ? read(n);
? ? t:=2;c:=0;
? ? while n>0 do
? ? begin
? ? ? ? n:=n-t;
? ? ? ? t:=t*0.98;
? ? ? ? inc(c);
? ? end;
? ? write(c);
end.
轉載于:https://www.cnblogs.com/YYC-0304/p/9500185.html
總結