Вычислить арифметическое выражение в турбо паскале

[Ksuu]

Сообщение от Artsiom

В языке Turbo Pascal нет встроенной функции Tan, но тангенс может быть вычислен с помощью выражения: Sin(X) / Cos(X)

Так у меня вычислено в 7 строке

[Artsiom]

Ааа, ну а в 6 строке arctg, может попробуешь arctan...

[Ksuu]

Сообщение от Artsiom

Ааа, ну а в 6 строке arctg, может попробуешь arctan...

Получилось, спасибо)) но теперь когда в черном окне ввожу х, выдает ошибку 207

[Artsiom]

Сообщение от Ksuu

Получилось, спасибо)) но теперь когда в черном окне ввожу х, выдает ошибку 207

Спорим, ты вводишь число большее 0.5 или меньше чем -0.5,

sqrt(1-sqr(2*x))

а оно пытается извлечь корень из отрицательного числа, ну и соответственно выдаёт сию ошибку.

[Ksuu]

Сообщение от Artsiom

Спорим, ты вводишь число большее 0.5 или меньше чем -0.5,

а оно пытается извлечь корень из отрицательного числа, ну и соответственно выдаёт сию ошибку.

Да) Так и должно быть или надо исправлять? И если исправлять, то как? Скажи пожалуйста

[Artsiom]

http://pascal.net.ru/ArcSin
Там даже готовая функция есть, осталось чуть-чуть подправить.

[Ksuu]

Я не понимаю(