Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.09.04;
Скачать: CL | DM;

Вниз

Как осуществить возведение в степень 1/3 ?   Найти похожие ветки 

 
Georgij   (2005-05-10 23:53) [0]

Добрый вечер !

Подскажите пожалуста как с помощю Power возвести функцию в степень 1/3 (Одна треть). Заранье благодарен !


 
cerber   (2005-05-11 00:11) [1]

Никак.
Можно так:
a^b= exp((ln(a)*b) при условии а>0, b>0


 
П7   (2005-05-11 01:18) [2]

в модуле math есть функция Power.


 
dRake ©   (2005-05-11 01:40) [3]



 FUNCTION CubeSqrt( X : single ) : single;
 VAR
   Dummy : single;
 BEGIN;

    Dummy := sqrt(x);
    while abs(Dummy - X/sqr(Dummy)) > 0.001 do
      begin
        Dummy := (2*Dummy + X/sqr(Dummy))/3;
      end;

    Result := Dummy;

 END;



 
Antonn ©   (2005-05-11 05:30) [4]

Georgij   (10.05.05 23:53)
:=power(8,1/3);



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

Текущий архив: 2005.09.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
3-1122353743
set666
2005-07-26 08:55
2005.09.04
Query и dbgrid


14-1123529076
Fredericco
2005-08-08 23:24
2005.09.04
Рыбалка. Иваньковское вдхр.


14-1123747026
Ilya___
2005-08-11 11:57
2005.09.04
Как думаете сколько мне можно попросить за мою програмку?


5-1095271051
Константинов
2004-09-15 21:57
2005.09.04
Перехват сообщений при создании компонентов


4-1121752041
chameleon
2005-07-19 09:47
2005.09.04
Почему не для всех структур нужно указывать размер ?