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

admin2010-03-30  28

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

答案4

解析 本题考查For循环控制语句。sam的初始值为0,n的初始值为0,每执行一次For i循环,先令x值等于n浮点除以i,然后再把这一x值加到sum上,很显然,sum的最终结果为:0/1+1/2+2/3+3/4+4/5,故正确答案为C。
转载请注明原文地址:https://jikaoti.com/ti/vrg0FFFM
0

最新回复(0)