Приветствую Вас Гость | RSS

Delphi заготовки

Суббота, 23.11.2024, 09:57
Главная » 2012 » Апрель » 23 » Пример расчета функций sinh,CosH,TanH Delphi/Pascal
14:29
Пример расчета функций sinh,CosH,TanH Delphi/Pascal
расчет некоторых функций Pascal
формулы расчета



Function sinh(x:real):real;
begin
   sinh:=(exp(x)-exp(x*(-1)))/2;
end;

Function cosh(x:real):real;
begin
   cosh:=(exp(x)+exp(x*(-1)))/2;
end;

Function tanh(x:real):real;
begin
   tanh:=(exp(x)-exp(x*(-1)))/(exp(x)+exp(x*(-1)));
end;

изображение с сайта Wiki


Просмотров: 2591 | Добавил: NetSoftWare | Теги: tanh, sinh, cosh | Рейтинг: 4.0/1
Всего комментариев: 0
Имя *:
Email *:
Код *: