Vba.разработать макро функцию с одним параметром n, который рассчитываться по указному ниже выражению(n > = 1). в функции нельзя использовать оператор if.  написать программный код. если что, то это только первый курс, поэтому не надо мудрить супер крутой код. : )

yusifmailov1 yusifmailov1    2   07.08.2019 20:00    0

Ответы
AlinaRoz AlinaRoz  04.10.2020 03:36
Сначала получим формулу, которую требуется реализовать в теле функции.

\displaystyle F=n^2+(n+1)^2+(n+2)^2+...+(2n)^2= \\ 
(n+0)^2+(n+1)^2+(n+2)^2+...+(n+n)^2 =\sum_{i=0}^n(n+i)^2

Теперь можно легко написать код соответствующей функции

Function F(n As Integer) As Double
    Dim s As Double, i As Integer
    s = 0
    For i = 0 To n
        s = s + (n + i) ^ 2
    Next i
    F = s
End Function

Sub Test()
    MsgBox "F(10)=" + Str(F(10))
End Sub
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы