Регистрация
Войти
Стать экспертом Правила
Информатика

Друзья дали задание Решить в екселе через бейсик вот эту формулу, я пытался но выскакивает ошибка постоянно. Кому не лень распишите пожалуйтса!
Нужно расписать в бейсике через ексель, что бы кнопка выдавала результат сама

ОТВЕТЫ
Sub CommandButton1_Click()
     Dim x, a, b, c, y As Double
    x = 5.2319
    a = -2.9565
    b = 0.8204
    c = 0.05
    y = -Exp(b) + (a ^ 2 - Sin(3 * (x) ^ 3) ^ 2) / (Sqr(b ^ 2 - c) + x ^ (1 / 3))
    MsgBox y
End Sub

Вот так у меня выдает правильный ответ
201
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам