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

Вниз

написание математически функций в делфи   Найти похожие ветки 

 
Tru ©   (2007-02-26 18:36) [0]

Помогите пожалуйста.
У меня дана функция a=ln(sqrt(exp(x-y))+x^(модуль(y))+z).
вот... как правильно записать степень и модуль... и как факториал записать в делфи.
В С++ воспринималось степень как ^, а в делфи я не знаю как!!!


 
MBo ©   (2007-02-26 18:45) [1]

Power
Abs

>В С++ воспринималось степень как ^
Это точно?


 
S@shka ©   (2007-02-26 18:48) [2]

Модуль = abs ()

a^b = exp(b(ln(a)))

Факториал - только своя функция вычисления

function Fact (A : Cardinal) : Cardinal;
var i : Integer;
begin
  if (A = 0) then result := 1
               else begin
                       for i := 1 to A do
                       Result := Result * i;
                     end;
end;


 
Tru ©   (2007-02-26 18:48) [3]

да точно, я не раз пользовалась!
power(x,степень) так или по другому писать надо?


 
Рамиль ©   (2007-02-26 19:00) [4]


> S@shka ©   (26.02.07 18:48) [2]

Не, так не кошерно :) Надо так

function Fact(const n: int64) :int64;
begin
 if n > 1 then
   Result := Fact(n-1) * n
 else
   Result := 1;
end;


 
S@shka ©   (2007-02-26 19:03) [5]


> Рамиль

Ох не люблю Рекурсию
да и не существует Факториала Отрицатльных чисел, а у тебя 1


 
Tru ©   (2007-02-26 19:05) [6]

всем спасибо!!! :)


 
MBo ©   (2007-02-26 19:58) [7]

>или по другому писать надо?
справка - лучший помощник



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

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

Наверх





Память: 0.46 MB
Время: 0.038 c
3-1166470607
школьник :-)
2006-12-18 22:36
2007.03.18
Коннект к базе MS SQL


2-1172484389
Cara
2007-02-26 13:06
2007.03.18
Фильтр.


5-1150058152
KIvan
2006-06-12 00:35
2007.03.18
Картинки в заголовках колонок TListView


3-1166595725
Ega23
2006-12-20 09:22
2007.03.18
Добавить Calculated-поле в ран-тайм


2-1172321193
ishicucu
2007-02-24 15:46
2007.03.18
Печать содержимого TWebbrowser





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский