窗体中有文本框Text1、Text2和Text3。运行程序时,输入整数m和n(n>0),单击按钮Command1计算下列表达式的值: SUM=m-(m+1)/2+(m+2)/3-(m+3)/4+…+(-1)n+1(m+n-1)/n 在Text3给出结果,事

admin2020-10-14  38

问题 窗体中有文本框Text1、Text2和Text3。运行程序时,输入整数m和n(n>0),单击按钮Command1计算下列表达式的值:
SUM=m-(m+1)/2+(m+2)/3-(m+3)/4+…+(-1)n+1(m+n-1)/n
在Text3给出结果,事件代码如下:
Private Sub Command1_Click()
Dim sum As Double
m=Val(me!Text1)
n=Val(me!Text2)
sum=0
For k=1 to n
  sum=sum+【   】/k
Next k
Me!text3=sum
End Sub
程序【】处应填写的语句是:

选项 A、IIf(k Mod 2 = 0, -(m + k - 1), (m + k - 1))
B、IIf(k Mod 2 = 0, (m + k - 1), -(m + k - 1))
C、IIf(k Mod 2 > 0, -(m + k - 1), (m + k - 1))
D、IIf(k Mod 2 < 0, (m + k - 1), -(m + k - 1))

答案A

解析  本题是求解一个表达式的值。从题目中我们可以看出分母从1取值一直到m,第k个项,如果k是奇数,则是m+(k-1),否则是m-(k-1)。所以本题就是找出满足条件的表达式(注:Iff(x,y,z)函数中若x为真,则返回y,否则返回z),只有A选项满足。因此,本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/yKcp777K
0

最新回复(0)