Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Кубический корень....

гость23 © (2002-09-10 22:59:00)
Есть ли такая процедура, кот. возращала бы куб. корень из Х

Suntechnic (2002-09-11 00:28:00) [1]
Almaz © (11.09.02 00:21)

> Dmk © (11.09.02 00:08)
> А если использовать FPU
> fsqrt st(0)
> fwait
> fsqrt st(0)
> fwait
>
> то получится намного быстрее чем Power

Быстрее-то оно быстрее, но зато результат неверный :))

Мне всё это напомнило бородатый анекдот про секретаршу, у котрой при приёме на работу спрашивают с какой скоростью она печатает:
- 200 знаков в минуту
- !!!???
- Только такая фигня получается

P.S. Сорри за оффтопик. Не удержался :)

Dmk (2002-09-11 00:23:00) [2]
Голова болит :)(
Неправ я ... Пойду посплю

Almaz (2002-09-11 00:21:00) [3]

> Dmk © (11.09.02 00:08)
> А если использовать FPU
> fsqrt st(0)
> fwait
> fsqrt st(0)
> fwait
>
> то получится намного быстрее чем Power

Быстрее-то оно быстрее, но зато результат неверный :))
Два раза извлечь квадратный корень равносильно извлечению корня четвертой степени. (9 класс средней школы :)))

Удачи.

einsam (2002-09-11 00:17:00) [4]
2 Dmk
Извините, но если для 8 вызвать один раз квадратный корень, а потом еще раз квадратный корень, то вы никогда не получите 2 (проверьте на калькуляторе).

Dmk (2002-09-11 00:08:00) [5]
2 Suntechnic © (10.09.02 23:38)
Я понял. Между прочим, если вызвать эту функцию два раза, то получиться нужный результат.
А если использовать FPU
fsqrt st(0)
fwait
fsqrt st(0)
fwait

то получится намного быстрее чем Power
А если использовать XMM расширения, то еще быстрее

Almaz (2002-09-10 23:46:00) [6]
В модуле Mathесть функция возведения в любую степень - Power. Из алгебры известно, что извлечение кубического корня эквивалентно возведению числа в степень 1/3. Таким образом:

uses Math, ... X := 8; Result := Power(X, 1/3); // = 2 :))

Удачи.

Suntechnic (2002-09-10 23:38:00) [7]
>Dmk © (10.09.02 23:25)
The result is the square root of X.
Ну насколько я знаком с английским square rootэто квадратный корень, а человек просил кубический.

Dmk (2002-09-10 23:25:00) [8]
Returns the square root of X.

Unit

System

Category

arithmetic routines

function Sqrt(X: Extended): Extended;

Description

X is a floating-point expression. The result is the square root of X.

Наверх

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