| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как возвести в степень отрицательное число? [D6, Win95/98]
Transaero © (2002-03-19 12:04:00)Как возвести в степень отрицательное число?
VictorT (2002-03-19 13:22:00) [1]Была подобная ветка в потрепаться.
drol (2002-03-19 13:05:00) [2]Надо x возвести в y
В целую степень возвести с помощью Power
А вот в действительную можно возвести только положительное число
p:=exp(y*ln(x));
DieHard (2002-03-19 13:05:00) [3]2Miwa: Наверно имеется в виду четная/нечетная степень?
И, кстати, существует такая функция как odd
Miwa (2002-03-19 12:48:00) [4]2 SVM:
function Power(const Base, Exponent: Extended): Extended;
Description
Power raises Base to any power. For fractional exponents or exponents greater than MaxInt, Base must be greater than 0.
Поэтому может сделать так:
if a < 0 then
if a div 2 = 0 then {число четное}
a:=power(abs(a),st) else a:=-power(abs(a),st)
SVM (2002-03-19 12:21:00) [5]A Power, IntPowerне подходят?
| |
