2. 计算机
  3. 下列程序的功能是求算式：1-1／2+1／3-1／4+……前30项之和。请在空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Commandl_Click() Dim i as integer，s as si

下列程序的功能是求算式：1-1／2+1／3-1／4+……前30项之和。请在空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Commandl_Click() Dim i as integer，s as si

admin2011-10-24  152
问题 下列程序的功能是求算式：1-1／2+1／3-1／4+……前30项之和。请在空白处填入适当的语句，使程序可以完成指定的功能。
    Private Sub Commandl_Click()
         Dim i as integer，s as single，f as integer
         s=0：f=1
         For i=1 To 30
               s=s+f／i
               f=【11】
         Next i
        Debug．Print”1-1／2+1／3-1／4+……=”;S
    End Sub
选项
答案 (-1)*f
解析 要计算1-1／2+1／3-1／4+…的前30项和，可以看出，偶数项的系数为负，f初始值为1，利用f=(-1)*f实现偶数项系数为负，奇数项系数为正。
转载请注明原文地址:https://kaotiyun.com/show/STup777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)