Написать программу для нахождения значений функции: Y=5x-3 если x<0, y=SQR(X) если х>=0

Question

Написать программу для нахождения значений функции:
Y=5x-3 если x<0, y=SQR(X) если х>=0

Comments

на каком языке?

---

на языке VBA

Answer 1

Dim x, y As Double
x = InputBox("Enter X")
If x < 0 Then y = 5 * x - 3
If x >= 0 Then y = Sqr(x)
MsgBox (y)