Скачать: CL | DM;

Логарифм   Найти похожие ветки 

← →
Начинающий1   (2008-09-07 19:39) [0]

Как можно в Delphi подсчитать логарифт к примеру: N=log2(15), подключил модуль math, но функцию log Delphi не знает, киньте плиз пример.

---

← →
Renegat ©   (2008-09-07 19:49) [1]

Функцию Ln Делфи знать обязан. А далее - модуль перевода в зубы, и рысью марш ;)

---

← →
Renegat ©   (2008-09-07 19:52) [2]

Кстати, если требуется конкретно двоичный логарфм, ст0ит, ИМХО, юзать FPU-мнемонику FYL2X.

---

← →
Начинающий1   (2008-09-07 19:54) [3]

Простите, что узнать? FPU-мнемонику FYL2X, это что?

---

← →
Юрий Зотов ©   (2008-09-07 19:59) [4]

> Начинающий1

Ln function
Returns the natural log of a real expression.

LnXP1 function
Returns the natural log of (X+1)

Log10 function
Calculates log base 10.

Log2 function
Calculates log base 2.

LogN function
Calculates the log of X for a specified base.

И все это взято из справки. Ай-яй-яй.

---

← →
Начинающий1   (2008-09-07 20:02) [5]

:( стало стыдно, спасибо большое

---

← →
Smile   (2008-09-07 20:03) [6]

А по мне простой арифметики достаточно
N:= (ln(15))/(ln(2));
то есть
N:= (ln(x))/(ln(основание));

---

← →
Юрий Зотов ©   (2008-09-07 20:34) [7]

> Smile   (07.09.08 20:03) [6]

Если не нужна скорость - то да. Если нужна - то лучше использовать функции, которые задействуют команды сопроцессора напрямую.

---

← →
Renegat ©   (2008-09-07 20:40) [8]

> Простите, что узнать?

В общем-то, ЮЗ уже всё за меня сказал. И тем не менее:

func log(N:Extended):Extended;
asm
 FLD1;
 FLD TBYTE PTR [EAX];
 FYL2X;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c