设计VB程序:我国有13亿人口,假定人口增长率为0.8%,多少年后我过人口超过26亿.求此段程
题目
设计VB程序:我国有13亿人口,假定人口增长率为0.8%,多少年后我过人口超过26亿.求此段程
设计VB程序:我国有13亿人口,假定人口增长率为0.8%,多少年后我过人口超过26亿.求此段程序代码,
答案
Option Explicit
Private Const START_NUMBER = 13
Private Const END_NUMBER = 26
Private Const RATE = 1.008
Private Sub Form_Load()
Dim number As Double
Dim years As Long
number = START_NUMBER
Do Until number >= END_NUMBER
number = number * RATE
years = years + 1
Loop
MsgBox years
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点