IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Вычисление Логарифма с заданной точностью, числа 2
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 87
Пол: Мужской

Репутация: -  0  +


Помоги плиз... надо вычислить Натуральный Логарифм числа 2 с заданной точностью. финкция раскладывается так Ln(1+x)=E(-1)^n+1 * (X^n)/n
E это типа сигма... smile.gif ...так вот число 2 мы представляем как Ln(1+1) и расписываем по формуле. Пользователь вводит точность, т.е. количество слагаемых по которым будет разложен ряд. т.е. например ввел число 2 то 1-1/2 и все...
Цитата
function _Ln(x: double): double;
const eps = 0.0000001; { Задаем точность }
var
s, next: double;
n: integer;
begin
next := (x - 1)/(x + 1);
s := next; n := 1;
repeat
inc(n, 2);
next := (next * sqr(x - 1))/sqr(x + 1);
s := s + next/n;
until (next/n) < eps;
_Ln := 2 * s
end;

Нашел эту функцию, но не получается уменя переделать погрешность, т.е. не хватает мозга, чтобы прога работала...пожалуйста помоги... wink.gif ...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Гость






TOPEHTO, ты напиши, чего ты хочешь? КАК ты бы хотел вызывать функцию? ЧТО переделывать-то требуется? Сначала ты говоришь, что проблема в точности, сейчас выясняется что не совсем...

Да, кстати:
Цитата
финкция раскладывается так Ln(1+x)=E(-1)^n+1 * (X^n)/n
Ты уверен? Это разложение - когда -1<X<=1... У тебя же Х=2, так что будь добр раскладывать по правильной формуле...
 К началу страницы 
+ Ответить 

Сообщений в этой теме
TOPEHTO   Вычисление Логарифма с заданной точностью   7.11.2006 22:45
arhimag   а если сделать так? function _Ln(x: double; eps: d…   7.11.2006 22:48
volvo   А для этого тебе никакого мозга и не надо... Ты ж …   7.11.2006 22:48
TOPEHTO   Значение Еps Я переделал, Я не это имелл ввиду...м…   7.11.2006 22:56
arhimag   Volvo, ты знаешь, ответ : не знаю я просто предлож…   7.11.2006 22:57
мисс_граффити   ТOPEHTO, замени цикл на for. или просто условие др…   7.11.2006 22:58
TOPEHTO   мисс_граффити ЗАменил...но чето не пашет...ты пони…   7.11.2006 23:05
volvo   TOPEHTO, ты напиши, чего ты хочешь? КАК ты бы хоте…   7.11.2006 23:17
мисс_граффити   Ты уверен? Это разложение - когда -1<X<=1..…   7.11.2006 23:48
volvo   Да? Только вот автор почему-то приводит одну форму…   8.11.2006 0:34
TOPEHTO   volvo мисс_граффити прав, точнее Я не наю на сколь…   8.11.2006 3:40
мисс_граффити   мдя... после такого оскорбления я явно в этой теме…   8.11.2006 4:22
TOPEHTO   Народ, чтобы не создавать новую тему, может подска…   8.11.2006 22:12
klem4   Посмотри тут И всетаки не стоит задавать свои воп…   8.11.2006 22:22
TOPEHTO   klem4 пасиб конечно, но чтото это мне както не пом…   8.11.2006 22:37


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 16.04.2021 8:20
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name