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

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

Мат функции [D6, WinXP]

maxXP ©   (2004-11-09 23:23:00) 

как возвести в квадрат число
не используя структуру
exp(abs(число)*ln(степень))

есть ли подк модуль

---

Ozone   (2004-11-10 07:42:00) [1]

Думкин ©   (10.11.04 07:36) [6]

Посмотрел. Там:

if (Frac(Exponent) = 0.0) and (Abs(Exponent) <= MaxInt) then
 Result := IntPower(Base, Integer(Trunc(Exponent)))
else
 Result := Exp(Exponent * Ln(Base))


Почти правильно ;)

---

Думкин   (2004-11-10 07:36:00) [2]

> [5] Ozone ©   (10.11.04 07:33)

А - код посмотри.

---

Ozone   (2004-11-10 07:33:00) [3]

Думкин ©   (10.11.04 07:32) [4]

Что именно?

---

Думкин   (2004-11-10 07:32:00) [4]

> [3] Ozone ©   (10.11.04 07:12)

Это не так.

---

Ozone   (2004-11-10 07:12:00) [5]

maxXP   (09.11.04 23:23)  

только так - exp(степень*ln(число))

DiamondShark ©   (09.11.04 23:32) [2]

а power - есть ни что иное как exp(b,ln(a));

---

DiamondShark   (2004-11-09 23:32:00) [6]

Если именно в квадрат, то sqr(x) (кстати, уж об x*x можно было бы и самому догадаться).

Если в любую степень, то power (модуль Math).

---

Kolan   (2004-11-09 23:31:00) [7]

> как возвести в квадрат число

x*x


> есть ли подк модуль

Да есть Math. В хелпе Math Routines...

---

Наверх