• VBA.Разработать макро функцию с одним параметром n, который рассчитываться по указному ниже выражению(n > = 1). В функции нельзя использовать
    оператор IF.
    [tex]n^2 + (n +1)^2 + ... +(2n)^2[/tex]
    Написать программный код. Если что, то это только первый курс, поэтому не надо мудрить супер крутой код. :)

Ответы 1

  • Сначала получим формулу, которую требуется реализовать в теле функции.\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 = sEnd FunctionSub Test()    MsgBox "F(10)=" + Str(F(10))End Sub
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years