Задача для VBA вычислить формулу.

[donoway]

Помогите, пожалуйста, написать программу на VBA, которая будет запрашивать значение х и вычислять значение функции в 3ем примере на скриншоте.
Я знаю Паскаль, а как на ВБА писать не представляю, думаю разберусь по ходу

[аналитика]

x=inputbox("x=...")
select case true
   case x<-1
      y=log(abs(x-1))

   case x>=-1 and x<1
      y=x^3

   case x>=1
      y=log(abs(x+1))

end select
msgbox y

[GWolf]

x=inputbox("x=...")
select case true
   case x<-1
      y=log(abs(x-1))

   case x>=-1 and x<1
      y=x^3

   case x>=1
      y=log(abs(x+1))

end select
msgbox y

Гм, если не ошибаюсь, то приведено решение лишь варианта № 3?!

[ShAM]

Так каков вопрос, таков ответ.

Помогите, пожалуйста, написать программу на VBA, которая будет запрашивать значение х и вычислять значение функции в 3ем примере на скриншоте.

[GWolf]

то шо "разбирусь по ходу" - прочитал позже, чем написал пост. Удалять не стал, так как подумалось, кто то прочтет и понятней ему будет.

Успеха!