求助高手 vb编程 急急急 高分相送 完成后追加20

来源：百度知道 编辑：UC知道 时间：2024/06/06 23:38:23
编写程序，有一个数列，前三项都是1，从第四项开始，每一项都是其相邻两项之和的二分之一。试编写通用过程（函数或子程序），求数列前n项的平均值。要求调用该过程，计算并输出n=44时前n项的平均值（保留2位小数）。
相邻两项 指的是前两项
传说中的高手啊 我要的是通用过程 不是一个答案 求各位帮帮忙了 谁会 快挣钱了

相邻两项是指前两项，例第四项的前两项就是第二和第三两项,那么后面的结果永远是1
Private a, b, c, start As Double
Private count1 As Integer

Public Sub calu(count1 As Integer)
a = 1
b = 1
c = 1
start = 3
While start < count1 -3
start = start + 1
c = (a + b) / 2
a = b
b = c
Wend
Print c
End Sub

这是过程,结果永远是1

第四项的相邻两项是低3和第5项吧？第三项为1，第五项为0（还没有赋值，默认为0），那么第四项等于1，接着，同理，第五项等于1......
很显然错了，题目说清楚点啊。

相邻两项是左两项还是又两项？？？还个左右各一项？？