| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Логарифм

Начинающий1 ©   (2008-09-07 19:39:00) 

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

---

Renegat   (2008-09-07 20:40:00) [1]

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

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

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

---

Юрий Зотов   (2008-09-07 20:34:00) [2]

> Smile   (07.09.08 20:03) [6]

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

---

Smile   (2008-09-07 20:03:00) [3]

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

---

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

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

---

Юрий Зотов   (2008-09-07 19:59:00) [5]

> Начинающий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 19:54:00) [6]

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

---

Renegat   (2008-09-07 19:52:00) [7]

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

---

Renegat   (2008-09-07 19:49:00) [8]

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

---

Наверх