Консультация № 185662
25.03.2012, 16:20
81.51 руб.
0 4 1
Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Численно убедиться в справедливости равенства, для чего для заданного значения аргумента x вычислить левую его часть и разложение, стоящее в правой части, с заданной погрешностью ε=0,001. Вывести число итераций n, необходимых для достижения заданной точности.

ln Abs(sin x)=- ln2-cos2x-(cos4x/2)-...-(cos2nx/n)-..., 0<x<П

Обсуждение

давно
Профессор
230118
3054
25.03.2012, 16:49
общий
Что-то в формуле не то. Везде получается 2x
давно
Мастер-Эксперт
27822
2370
27.03.2012, 09:55
общий
это ответ
Здравствуйте, Сергей Панфилов!
Программа-макрос решения на Вордовском Basic/VBA встроена в документ, находящийся тут; пояснения в самом документе.
Новая ссылка дана уже на исправленный документ.
давно
Мастер-Эксперт
27822
2370
27.03.2012, 13:25
общий
Прошу прощения, сейчас допёр, что у меня там некоторый ляп: в операторе
If PN% <= RN% And VI% < 99900 Then GoTo BeCy несоответствие - переменная VI% типа Integer не может стать больше, чем 32767. Надо или заменить в операторе 99900 на 32767, или во всех VI% поменять % на & (тип Long)
давно
Мастер-Эксперт
27822
2370
28.03.2012, 05:25
общий
Сейчас в ответе ссылка дана уже на исправленный документ.
Форма ответа