Написать программу в VBA в Access

Задача: Написать программу, вычисляющую значение функции y, если

y=2a+x2 при x>0

y=3b+3a при x=0

y=sinx+a при x<0

Question

Информатика

Меркурий

12 марта, 01:30

Написать программу в VBA в Access

Задача: Написать программу, вычисляющую значение функции y, если

y=2a+x2 при x>0

y=3b+3a при x=0

y=sinx+a при x<0

+2

Ответы (1)

Знаете ответ на вопрос?

Констанция · Answer 1

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

Написать программу в 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