2. 计算机
  3. 设有如下程序： Private Sub Command1_Click() Dim sum As Double, x As Double sum＝0 n＝0 For i＝1 To 5 x＝n/i n＝n

设有如下程序： Private Sub Command1_Click() Dim sum As Double, x As Double sum＝0 n＝0 For i＝1 To 5 x＝n/i n＝n

admin2010-03-22  77
问题 设有如下程序：   
Private Sub Command1_Click()   
Dim sum As Double, x As Double   
sum＝0   
n＝0   
For i＝1 To 5   
x＝n/i   
n＝n+1     
sum＝sum+x   
Next i   
End Sub   
该程序通过For循环来计算一个表达式的值，这个表达式是(    )。
选项 A、1+1/2+2/3+3/4+4/5
B、1+1/2+1/3+1/4+1/5
C、1/2+2/3+3/4+4/5
D、1/2+1/3+1/4+1/5
答案C
解析 本题考查VBA中循环结构的知识。这类问题需要分析出每一次循环所做的操作。第一次循环时， i＝1,n＝0,x＝0/1，所以累加上去的是0/1；第二次循环时， i＝2,n＝1,x＝1/2，所以累加上去的是1/2；第三次循环时， i＝3,n＝2,x＝2/3，所以累加上去的是2/3；循环5次后累加的应该是0/1+1/2+2/3+374+4/5。
转载请注明原文地址:https://kaotiyun.com/show/v8wp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)