Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.12.2019, 01:07   #1
LichtPilz2
Новичок
Джуниор
 
Регистрация: 24.12.2019
Сообщений: 1
По умолчанию Compile error: Expected: list separator or (VBA)

помогите пожалуйста правильно написать формулу, уже долго сижу не понимаю где ошибка в ней
y = Sqr((sin(x)) ^ 2 * Atn(-(Abs(B ^ 2 + Sqr(C))) / Sqr(-(Abs(B ^ 2 + Sqr(C))) * Abs(B ^ 2 + Sqr(C)) + 1)) + 2 * Atn(1) / Abs(Exp(x + 2)) + 25 ^ 2

P.S оригинальную формулу прикрепил.
Изображения
Тип файла: jpg jm1wJrBb0pc.jpg (4.4 Кб, 27 просмотров)
LichtPilz2 вне форума Ответить с цитированием
Старый 24.12.2019, 10:58   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

1.
Цитата:
Atn(-(Abs(B ^ 2 + Sqr(C))) / Sqr(-(Abs(B ^ 2 + Sqr(C))) * Abs(B ^ 2 + Sqr(C)) + 1)) + 2 * Atn(1)
ето чего аrccos так записывается?
2. скобки проверить
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 24.12.2019, 14:20   #3
unbanned
Форумчанин
 
Аватар для unbanned
 
Регистрация: 23.11.2010
Сообщений: 530
По умолчанию

Тогда может будет проще вынести arccos в функцию? так и скобочки искать проще будет

Код:
Public Function ArcCos(A As Double) As Double
  'Inverse Cosine
    On Error Resume Next
        If A = 1 Then
            ArcCos = 0
            Exit Function
        End If
        ArcCos = Atn(-A / Sqr(-A * A + 1)) + 2 * Atn(1)
    On Error GoTo 0
End Function

Код:
y = Sqr((sin(x)) ^ 2 *ArcCos(Abs(B ^ 2 + Sqr(C))))/ Abs(Exp(x + 2)) + 25 ^ 2

Последний раз редактировалось unbanned; 24.12.2019 в 14:23.
unbanned вне форума Ответить с цитированием
Старый 24.12.2019, 14:31   #4
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Цитата:
Сообщение от unbanned Посмотреть сообщение
так и скобочки искать проще будет
unbanned, вангую что не будет ТС их искать, ведь для того что-бы знать верно ли формула написана, надо результат с чем-то сравнивать.

p.s. в вашем решении вроди как 2 скобки пропущено, но не факт
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 24.12.2019, 15:19   #5
unbanned
Форумчанин
 
Аватар для unbanned
 
Регистрация: 23.11.2010
Сообщений: 530
По умолчанию

Aleksandr H.,
а может и не только две знаменатель оставил с "пунктуацией автора". но по всей видимости его тоже нужно взять в скобки.
unbanned вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[C++ Error] Unit1.cpp(25): E2293 ) expected. [C++ Error] Unit1.cpp(25): E2377 If statement missing ). [C++ Error] Unit1.cpp(26): E2293 )expected.дают такие ошибки не могу исправить Zikrulloh Помощь студентам 0 17.12.2017 18:50
compile error can't find project or library redwert Microsoft Office Excel 2 20.06.2012 15:15
Появилась ошибка Compile error Next without for Snekich Microsoft Office Excel 5 11.02.2012 13:41
[Fatal Error] Project1.dpr(5): Could not compile used unit 'D:\Данил\Ну погоди\Unit1.pas' gufon Общие вопросы Delphi 19 03.03.2011 01:58
Compile Error in hidden Module: Module1 ruavia3 Microsoft Office Excel 8 18.08.2009 23:52