逆推算法，算法实例：存款费用计算vb.net代码

最新推荐文章于 2021-08-04 16:58:53 发布

清风不拂面

最新推荐文章于 2021-08-04 16:58:53 发布

阅读量377

点赞数

分类专栏： vb.net 源代码文章标签：算法

本文链接：https://blog.youkuaiyun.com/kguncn/article/details/108859106

版权

本文介绍了一个用VB.NET实现的算法，用于计算在银行年利率1.71%的情况下，为确保儿子4年大学每月1000元生活费，母亲每个月需要存入的最低金额。采用逆推法，将4年分为48个月，逐月计算存入的金额。程序已在VS2017+Win10环境下通过编译，并提供了程序下载链接。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

问题描述：母亲为儿子sun 4年的大学生活准备了一笔存款，方式是整取零存，规定sun 每个月月底取下一个月的生活费。假设银行年利息为1.71%,计算该母亲每个月至少要存入多少钱？

算法分析：可采用逆推法分析存钱和取钱的过程，因为按照月为周期取钱，所以4年可以分为48个月，并对每个月进行计算。
如果第48个月后sun大学毕业连本带息要取1000元，则要求第47个月银行的存钱金额为：
第47个月月末存款=1000/(1+0.0171/12);
第46个月月末存款=（第47存款+1000）/(1+0.0171/12);
第45月末存款=（第46存款+1000）/(1+0.0171/12);
…….
第2月月末存款=（第3月月末存款+1000）/(1+0.0171/12);
第1月月末存款=（第2月末存款+1000）/(1+0.0171/12);

Public Class frmMoney
    Private Sub btnMoney_Click(sender As Object, e As EventArgs) Handles btnMoney.Click
        '若在M月连续连本带息取N元，需要现在一次性存款多少？
        Dim sngDraw, sngInterest, sngDeposit() As Single
        Dim intMonth, intI As Integer
        Try
            '检测数据的合理性
            If IsNumeric

最低0.47元/天解锁文章