Написать программу в VBA в Access Задача: Написать программу, вычисляющую значение функции y, еслиy=2a+x2 при x больше 0y=3b+3a при x=0y=sinx+a при x меньше 0
Написать программу в VBA в Access
Задача: Написать программу, вычисляющую значение функции y, если
y=2a+x2 при x>0
y=3b+3a при x=0
y=sinx+a при x<0
Гость
Ответ(ы) на вопрос:
ГостьSub F()
Dim a As Double, b As Double, x As Double, y As Double
a = InputBox("Введите a")
b = InputBox("Введите b")
x = InputBox("Введите x")
If x > 0 Then y = 2*a + x*x
If x = 0 Then y = 3*b + 3*a
If x < 0 Then y = Sin(x) + a
MsgBox (y)
End Sub
Не нашли ответ?
Похожие вопросы