не могу разобраться с задачей

[Sagara2_kis7]

Написать программу для вычисления функции f. Полученное значение функции вывести на экран.
функция f = 3 * ∑ (i ^ 4 + Log(i))
(параметр i сумма ∑ от 1 до 13 )
просто не могу понять как принцип как это делаеться в VBA excel...
подскажите пожалуйста решение....

[Sagara2_kis7]

заранее спосибо

[Sagara2_kis7]

подскажите пожалуйста какую команду надо дать чтобы он посчитал сумму от 1 до 13 я только это понять не могу,или хотя сбросьте пожалуйста подобные примеры...там уж разберусь....

[Sagara2_kis7]

вот мои наработки,подскажите что здесь не правельно...
Sub ïðèìåð_3()
M5: f = 3 * y(i)
For i = 1 To 13
If y(i) = Cells(i ^ 4 + Log(i)) Then GoTo M5
Debug.Print "f="; f, "y="; y
Next
End Sub

[Sagara2_kis7]

в ответе пишет нуль,где ошибка....не знаю....

[Летучий_СкилетиК]

я бы данную функцию вычислил так:

s = 0
for i =1 to 13
    s = s + (i ^ 4 + Log(i))
next i
f = 3 * Cells (s)

[Sagara2_kis7]

посибо огромное хоть что-то...

[Sagara2_kis7]

программа дает нуль...что-то не так

[Sagara2_kis7]

я тут сам по шаманил
это может быть правильным ответом:
Sub пример_3()
For i = 1 To 13
yi = (i ^ 4 + Log(i))
y = y + yi
f = 3 * y
Next
Debug.Print "f="; f
End Sub

[Sagara2_kis7]

программа дает нуль...к сожалению....на этот код:
s = 0
for i =1 to 13
s = s + (i ^ 4 + Log(i))
next i
f = 3 * Cells (s)