Спасибо огромное!!!!! всё заработало.

что то не работает, подставляю Х пишет ошибку. может не в ту степь пошел.
задание: Написать программный код, используя процедуру и функцию. Функцию разместить в категории «Математические».

спасибо. сейчас попробую.

доброе время суток. столкнулся с задачей, написать программный код тригонометрической функции:  y= 2sin(piX)+( sin3piX / 3X). написал как умею мне пишет ошибку. подскажите пожалуйста, в чем ошибка?
Sub Функция()
Dim x As Integer, y As Integer, a As Integer, b As Integer, c As Integer
a = 2 * Sin(3, 14 * x)
b = Sin(3 * 3, 14 * x)
c = 3 * x
y = a + (b / c)
End Sub