设有如下程序： Private Sub Commandl Click() Dimsum As Double,x As D0uble sum=0 n=0 For i=1 To 5

admin2010-03-30 37

问题设有如下程序： Private Sub Commandl Click() Dimsum As Double,x As D0uble 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

答案4

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

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

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