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

admin2012-03-22 49

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

答案C

解析

转载请注明原文地址:https://kaotiyun.com/show/MThp777K

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