下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值，请完善下列程序。 Furiction SumD （n As Integer）As Singles = 1i = 1 Do i = i + 1 s = s + 1 / iLoop Until [12] SumD = s End Function Private Sub Form Click（）sum1=SumD（）Print "sum1="; sum1 End Sub-计算机二级-简明问答题库

问题描述：

[填空] 下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值，请完善下列程序。 Furiction SumD （n As Integer）As Singles = 1i = 1 Do i = i + 1 s = s + 1 / iLoop Until [12] SumD = s End Function Private Sub Form Click（）sum1=SumD（）Print "sum1="; sum1 End Sub

参考答案：查看无
答案解析：无
☆收藏

上一篇：数据结构分为线性结构与非线性结构，带链的栈属于（）。下一篇：执行下列程序段后，整型变量n的值为（）。 n=0 For i=1 To 20 Step 5n=n+1 Next i

我要回答: 网友(216.73.217.21)
热门题目: 1.在名称为Form1的窗体上添 2.请编写函数fun，其功能时： 3.对于软件测试，从是否需要执行

当前位置：百科知识 > 计算机二级

随机题目