язык Delphi - Помощь студентам

bbk_serg · 25.01.2009, 17:37

Помогите!
Как выразить в Делфы arcsin и arccos?

Заранее СПАСИБО!!!

Sazary · 25.01.2009, 18:32

В модуле Math есть функции:

Код:

function ArcSin ( const Number : Extended ) : Extended;
function ArcCos ( const Number : Extended ) : Extended;

Можно выразить через арктангенс:

Код:

ArcSin := ArcTan(x / Sqr(-x * x + 1));
arccos := arctan(sqrt(1-sqr(x))/x)

5naip · 25.01.2009, 18:54

самое главное-то!!

чтою это все работало нужно этот модуль Math подключить сначала. Для этого нужно в разделе USES дописать Math.

Sazary · 25.01.2009, 19:35

5naip

Цитата:

чтою это все работало нужно этот модуль Math подключить сначала

Ну так это само-собой

5naip · 25.01.2009, 19:46

не,ну мало ли...может автор топика не знает....

25.01.2009, 17:37	#1
bbk_serg Пользователь Регистрация: 15.12.2008 Сообщений: 62	язык Delphi Помогите! Как выразить в Делфы arcsin и arccos? Заранее СПАСИБО!!!

25.01.2009, 18:32	#2
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	В модуле Math есть функции: Код: `function ArcSin ( const Number : Extended ) : Extended; function ArcCos ( const Number : Extended ) : Extended;` Можно выразить через арктангенс: Код: `ArcSin := ArcTan(x / Sqr(-x * x + 1)); arccos := arctan(sqrt(1-sqr(x))/x)` Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

25.01.2009, 18:54	#3
5naip Форумчанин Регистрация: 05.10.2007 Сообщений: 536	самое главное-то!! чтою это все работало нужно этот модуль Math подключить сначала. Для этого нужно в разделе USES дописать Math. rocklistener...

25.01.2009, 19:46	#5
5naip Форумчанин Регистрация: 05.10.2007 Сообщений: 536	не,ну мало ли...может автор топика не знает.... rocklistener...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Переведите на язык Delphi	neomaximus	Помощь студентам	1	26.11.2008 09:24
Помогите перевестить формулу на язык Delphi	neomaximus	Помощь студентам	2	23.11.2008 09:37
Переведите формулу на язык Delphi	neomaximus	Помощь студентам	2	12.11.2008 01:01
Переведите формулу на язык Delphi	neomaximus	Помощь студентам	3	11.11.2008 12:22