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

Автор donoway, 26.04.2012, 12:46

« назад - далее »

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

Цитата: аналитика от 26.04.2012, 16:56
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

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

Успеха!
Путей к вершине - множество. Этот один из многих!