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

admin2013-01-23 25

问题设有如下程序： 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 End Sub 该程序通过For循环计算一个表达式的值，这个表达式是 ______。

选项 A、1+1/2+2/3/4+4/5
B、1+1/2+2/3+3/4
C、1/2+2/3+3/4+4/5
D、1+1/2+1/3+1/4+1/5

答案4

解析本题考查循环语句，其过程如下：
i=1时，x=0/1=0，n=0+1=1，sum=0+0；
i=2时，x=1/2，n=1+1=2，sum=0+1/2；
i=3时，x=2/3，n=2+1=3，sum=0+1/2+2/3；
i=4时，x=3/4，n=3+1=4，sum=0+1/2+2/3+3/4；
i=5时，x=4/5，n=4+1=5，sum=0+1/2+2/3+3/4+4/5。

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

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