Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Вниз

степень числа   Найти похожие ветки 

 
lely   (2002-04-04 08:34) [0]

Функция возвращающая степень числа


 
Song   (2002-04-04 08:45) [1]

Power?


 
SerVS - S   (2002-04-04 10:05) [2]

Тебе нужно х^y?
Если да, то: exp(y*ln(x))


 
lely   (2002-04-04 10:14) [3]

Ну, нужно написать простенькую прогр-ку, в которой с кл-ры вводится число и степень и рез-т выводится в некое окошко. Подозреваю, что есть функция для вычисления этого...
Это и есть exp(y*ln(x)) ?


 
Alx2   (2002-04-04 10:21) [4]

еще есть power


 
Виктор Щербаков   (2002-04-04 10:24) [5]

в модуле Math


 
pasha676   (2002-04-04 10:51) [6]

Если мне не изменяет память - функция ln(x) - не очень универсальное решение (в чистом виде), т.к. область определения э
той функции x>0; То есть придеться дописывать.


 
lely   (2002-04-04 10:59) [7]

Так, понятно.А что с power? Т.е. коротенький пример


 
Alx2   (2002-04-04 11:04) [8]

Курсор ставим на power и жмем F1. В результате появляется окошко с помощью, где видим примерно следующее:

Raises Base to any power.

Unit

Math

Category

Arithmetic routines

function Power(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.

Из чего можно сделать вывод, что для возведения 2 в степень 1/3 необходимо написать: нечто := Power(2,1/3);


 
REA   (2002-04-04 11:36) [9]

Насчет степеней. Будьте аккуратнее с большими числами (где-то от 10 в 9ой) - иногда на AMD процессоре функция Power работает хуже, чем простое перемножение (возвращает неверное число). Intel впрочем ведет себя еще хуже - простое перемножение тоже возвращает не то. Хотя результат должен быть в пределах нормы. Сам не видел, но рассказывали.


 
Rooman   (2002-04-08 08:42) [10]

а z:=x^y не пробовали?


 
Alx2   (2002-04-08 09:19) [11]

Rooman © (08.04.02 08:42)
^ - указатель?


 
KSergey   (2002-04-08 09:28) [12]

>Rooman
А вы пробовали? ;) Так попробуйте


 
pasha676   (2002-04-08 11:24) [13]

Вообщем из фразы Base must be greater than 0. В описании power можно сделать вывод, что похоже там внутрях все те же логарифмы и экспоненты. Теперь лезим в Math и видим
function Power(Base, Exponent: Extended): Extended;
begin
if Exponent = 0.0 then
Result := 1.0 { n**0 = 1 }
else if (Base = 0.0) and (Exponent > 0.0) then
Result := 0.0 { 0**n = 0, n > 0 }
else if (Frac(Exponent) = 0.0) and (Abs(Exponent) <= MaxInt) then
Result := IntPower(Base, Integer(Trunc(Exponent)))
else
Result := Exp(Exponent * Ln(Base)) => ОПАЧКИ. Старый друг.
end;
То есть по сути абсолютно тоже самое exp(y*ln(x)).




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

Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.005 c
4-57927
alexey1
2002-02-13 04:09
2002.04.18
icons


14-57881
GarryBaldy
2002-03-12 16:22
2002.04.18
помогите!!! очень нужна помощь!!!


1-57783
Avgurin
2002-04-06 05:37
2002.04.18
GIF в Delphi


3-57611
bill133
2002-03-22 23:23
2002.04.18
Какая БД лучше


4-57916
AndreySG
2002-02-15 09:12
2002.04.18
WinApi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский