VB 编写函数fun,其功能是：能计算从1开始到n的自然数中偶数的平方和!急用!

分类: 作业答案 • 2021-12-03 15:57:11

问题描述：

答

Function sum(n) As Double
sum = 0
For i = 1 To n
If i Mod 2 = 0 Then sum = sum + i * i
Next
End Function