全國計算機等級考試二級VB程序設(shè)計模擬試題七【程序設(shè)計題】
程序設(shè)計(10分)
我國現(xiàn)有人口約13億,設(shè)年增長率為0.8%,編寫程序,計算多少年后增加到20億。
Private Sub Form_click()
Dim p As Single, r As Single, n As Integer
n = 0: p = 13: r = 0.008
Do While p <= 20
p = p * 1.01
n = n + 1
Loop
Print n; "年后增加至"; p; "億"
End Sub
![]() | ![]() .. 定價:¥225 優(yōu)惠價:¥213 更多書籍 |
![]() | ![]() .. 定價:¥133 優(yōu)惠價:¥133.0 更多書籍 |