Вычислить значение функции У. Подскажите, какой из вариантов решения правильный? - VBA
Формулировка задачи:
Задача такая: Вычислить значение функции У (х ввести с клавиатуры)
Посмотрите мои пожалуйста и скажите какой верный или может вообще не так сделал?
1.
2.
Решение задачи: «Вычислить значение функции У. Подскажите, какой из вариантов решения правильный?»
textual
Листинг программы
Sub Denwer() Dim x As Integer Dim y As Double x = Val(InputBox("Введите x")) If x = 0 Then y = 0 Else y=iif(x>0,sin(x),-1) MsgBox (" y = " & y) End Sub