Неверная вещественная операция в программе

[Misapapa]

Да,хорошо. Спасибо

[Serge_Bliznykov]

вот, первое слагамое (где десятичный логарифм)
я бы записал так:

ln(abs(b+(1-x)*x*x*x)+7)/ln(10)

[type_Oleg]

Да тангенс наверное в любом Паскале есть.
Вот степень имеет смысл создать:

function fPower(x,a:Real):Real; // x^a
begin
 fPower:=Exp(a*Ln(x));
end;

Хотя, для целых степеней, типа x^3, то я обычно пишу x*x*x.

[Misapapa]

Спасибо большое! Программа заработала! Тему можно закрывать.

[Вадим Мошев]

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

проблема в том, что функция логарифма не определена на всём множестве чисел.

Формулировка неверная. Вы так говорите, как будто это что-то плохое логарифм неопределён вообще нигде.
Правильнее сказать: "Функция логарифма определена не на всём множестве действительных чисел".

Пусть автор темы возьмёт эту фразу себе на заметку и считает, что логарифму можно давать только положительные числа

[Serge_Bliznykov]

Сообщение от Вадим Мошев

Формулировка неверная. Вы так говорите, как будто это что-то плохое логарифм неопределён вообще нигде.
Правильнее сказать: "Функция логарифма определена не на всём множестве действительных чисел".

Пусть автор темы возьмёт эту фразу себе на заметку и считает, что логарифму можно давать только положительные числа

Это не плохо и не хорошо - это факт.
А вот игнорирование этого факта и приводит либо к ошибкам, либо к заведомо убогим функциям (как, например, приведённая выше type_Oleg функция fPower, которая для отрицательных (и нулевых) X "неожиданно" вывалит ошибку

[Вадим Мошев]

Это не плохо и не хорошо - это факт.

Там же аллюзия на интернет-мем была...

[Serge_Bliznykov]

Сообщение от Вадим Мошев

Там же аллюзия на интернет-мем была...

да, да, я проглядел её, сорриии...