问题描述:
[填空]
下列过程的功能是:用来计算并输出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
参考答案:查看无
答案解析:无
☆收藏
答案解析:无
☆收藏
- 我要回答: 网友(216.73.216.96)
- 热门题目: 1.“表格生成器”对话框包括四个 2.以下项中不能作为C 语言合法 3.假设用一个长度为50的数组(
