全国计算机等级考试二级VB程序设计模拟试题七【程序设计】
程序设计(10分) 我国现有人口约13亿,设年增长率为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 相关资料 |