问题描述: 有一分数序列2/1,3/2,5/3,8/5 .,求这个数列前20 项之和 计算机VB编程, 1个回答 分类:综合 2014-11-03 问题解答: 我来补答 Private Sub Command1_Click()Dim a As Long, b As Long, cDim i As Integer, sum As Singlea = 2b = 1For i = 1 To 20 sum = sum + a / b Print i; a; "/"; b c = a a = a + b b = cNextPrintPrintPrint sumEnd Su 展开全文阅读