兰州理工大学vb试卷的答案.pdfVIP

试卷编号：8075 所属语言：Visual Basic 试卷方案：vb 期末模拟练习 试卷总分：100 分 共有题型：4 种 一、程序填空 共 1 题 （共计20 分） 第 1 题 （20.0 分） 题号:530 【程序填空】 功能：有数列 1/5 + 1/9 + 1/13 + 1 / (1 + k * 4) (k=100) 求前 100 项之和 Private Sub Command1_Click() Dim s As Double Dim k As Integer **********SPACE********** s = 【?】 **********SPACE********** For k = 1 To 【?】 **********SPACE********** s = s + 1 / (1 + 【?】) Next k Print s End Sub 答案： =======(答案 1)======= 0 ===