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

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

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

Как извлеч корень N-ой степени?

Nox © (2005-08-29 15:57:00)
Как извлеч квадвартый и др. корни..? Также возвести число в куб или любую другую степень? Я пробовал sqr sqrt, но они работают только со 2 сепенью, или нет? К тому же с sqrt какието проблемы, при такой записи sqrt(9) выдается ошибка, что, нужно extended вместо integer. Что это значит? В справке по extanded выдается диапазон его значений... и все.. почему 9 не входит в этот диапазон непонято... и почему в справке ничего не говорится про извлеение корней n-ых степеней???? Или я плохо смотрел?

Antonn (2005-09-01 17:44:00) [1]
Nox © (01.09.05 17:32) [7]
е-мое...
1. в секцию uses добавь math
2. корень -> power(число под корнем , 1/(степень корня));

jack128 (2005-09-01 17:44:00) [2]
То есть [3] тебе ну никак не подходит?

Nox (2005-09-01 17:32:00) [3]
Ну так все же... как.. скажите точно.. так-то и так-то... а то тут какие-то институтские курсы.... (я ведь начинающий)

jack128 (2005-08-29 22:29:00) [4]
Ega23 © (29.08.05 17:27) [4]
А можно и без Power.
через ln и exp
А можно и без ln и exp, через ряды ;)

jack128 (2005-08-29 22:29:00) [5]
Правда это уже институтский курс :-)

Ega23 (2005-08-29 17:27:00) [6]
А можно и без Power.
через ln и exp

Antonn (2005-08-29 17:14:00) [7]
power(число, 1/(степень))

begin...end (2005-08-29 16:05:00) [8]
> Nox © (29.08.05 15:57)

Чтобы возвести число в произвольную степень, можно использовать функцию Power из модуля Math.
Чтобы найти корень степени N (N > 0) из числа, нужно возвести число в степень 1/N, т.е. задача сводится к предыдущей.

Чтобы возвести число в квадрат или извлечь квадратный корень из него, лучше пользоваться не Power, а Sqr и Sqrt, соотвественно. Так будет быстрее.

> К тому же с sqrt какието проблемы, при такой записи sqrt(9)
> выдается ошибка, что, нужно extended вместо integer.

var
Root: Extended;
begin
Root := Sqrt(9)
end.

jack128 (2005-08-29 16:04:00) [9]
Math.Power + курс школьной математики..

Наверх

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