信息VB 用合适的循环语句实现以下计算:2007年我国粮食总产量
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/25 07:15:49
信息VB 用合适的循环语句实现以下计算:2007年我国粮食总产量
1.用合适的循环语句实现以下计算:2007年我国粮食总产量5000亿吨,如果粮食增长率为0.5%,求到2020年的粮食总产量.按钮命名为“粮食总产量”
运行后正确结果为:5334.93100461911
VB程序 .
1.用合适的循环语句实现以下计算:2007年我国粮食总产量5000亿吨,如果粮食增长率为0.5%,求到2020年的粮食总产量.按钮命名为“粮食总产量”
运行后正确结果为:5334.93100461911
VB程序 .
![信息VB 用合适的循环语句实现以下计算:2007年我国粮食总产量](/uploads/image/z/6816608-8-8.jpg?t=%E4%BF%A1%E6%81%AFVB+%E7%94%A8%E5%90%88%E9%80%82%E7%9A%84%E5%BE%AA%E7%8E%AF%E8%AF%AD%E5%8F%A5%E5%AE%9E%E7%8E%B0%E4%BB%A5%E4%B8%8B%E8%AE%A1%E7%AE%97%EF%BC%9A2007%E5%B9%B4%E6%88%91%E5%9B%BD%E7%B2%AE%E9%A3%9F%E6%80%BB%E4%BA%A7%E9%87%8F)
Dim year As Integer
Dim num As Double
num = 5000
For year = 2008 To 2020
num = num * (1 + 0.005)
Next
MessageBox.Show("到2020年粮食总产量:" & num & "亿吨.")
Dim num As Double
num = 5000
For year = 2008 To 2020
num = num * (1 + 0.005)
Next
MessageBox.Show("到2020年粮食总产量:" & num & "亿吨.")