小玉在游泳

最新推荐文章于 2024-01-18 17:32:15 发布

原创最新推荐文章于 2024-01-18 17:32:15 发布 · 1.3k 阅读

0 ·

CC 4.0 BY-SA版权

Pascal 专栏收录该内容

9 篇文章

订阅专栏

本文介绍了洛谷P1423-小玉在游泳问题的背景及解决方法。该问题关注小玉在游泳过程中因体力下降导致每次游泳距离递减的情况，探讨了如何计算到达特定距离所需的游泳次数。通过简单的循环结构实现了解决方案。

洛谷-P1423-小玉在游泳

题目描述：

小玉开心的在游泳，可是她很快难过的发现，自己的力气不够，游泳好累哦。已知小玉第一步能游2米，可是随着越来越累，力气越来越小，她接下来的每一步都只能游出上一步距离的98%。现在小玉想知道，如果要游到距离x米的地方，她需要游多少步呢。请你编程解决这个问题。

输入样例：
4.3

输出样例：
3

解题思路：

用个while就OK了！

var
        ans:longint;
        n,m,m1:extended;
begin
        ans:=1;
        m:=2.0;
        m1:=2.0;
        readln(n);
        if n<=2 then begin writeln(1);halt; end;
        while m<n do
        begin
                inc(ans);
                m1:=m1*0.98;
                m:=m+m1;
        end;
        writeln(ans);
end.