设有如下程序 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

admin2013-02-04 21

问题设有如下程序 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

解析当i=1时，sum=0+0/1；当i=2时，sum=0+0/1+1/2；当i=3时，sum=0+0/1+1/2+2/3；当i=4时， sum=0+0/1+1/2+2/3+3/4；当i=5时，sum=0+0/1+1/2+2/3+3/4+4/5，即For循环是用来计算表达式“1/2+2/3+3/4+4/5”的。

转载请注明原文地址:https://jikaoti.com/ti/Uww0FFFM

本试题收录于：二级Access题库NCRE全国计算机二级分类