计算机VB考试题.pdfVIP

过程函数： 501. 有一个数列，前三项都是 1，从第四项开始，每一项都是其相邻前三项之 和的 1/2 。试编写函数过程，求数列前 n 项的平均值。要求调用该过程，计算并 输出 n=20 时前 n 项的平均值（保留 4 位小数）。 结果： 10.1278 Function f( ByVal n As Integer ) As Double Dim f1, f2, f3, fn, s As D