Нужна помощь с делфи кто поможет?

Question

[hippi12]

Можете помочь перевести это в язык делфи, или помогите найти ошибку
m:= (x*exp(abc(y-x))+sqr(x)*y)/(z*sqrt(x+2*y)-0.5*x)
n:=(exp(3*ln(x))*ln(z)+2*sqr(y)*z/exp(1/3*ln(abc(x-z)+abc(y-x)+sqr(x)*z;

Comments

[Владислав Лысков]

Как минимум нужно взять в скобки числитель и знаменатель

Answer 1

[kalapanga]

1) Взятие абсолютного значения не "abc" а "abs"
2) В выражении для m берётся экспонента не того числа. В программе y-x в формуле y-z
3) Проверяйте скобки. В выражении для n левых скобок на несколько штук больше чем правых.
4) В Delphi для возведения положительных чисел в степень есть функция power. Для корня третьей степени её можно применить, т.к. под корнем у Вас всегда положительное число. Читабельнее будет. А x в кубе я бы тоже без экспонент/логарифмов написал: x*x*x. Это и короче, и быстрее считается, и результат в общем случае точнее.
5) На будущее. В вопросе нужно указывать о какой ошибке речь.
а) Ошибка компиляции
б) Ошибка времени исполнения (программа "падает" в процессе работы)
в) Всё работает, но результат отличается от ожидаемого
Для каждого случая потребуется своя дополнительная информация

Answer 2

[Vitsliputsli]

По-моему так:

n:=((x^3)*ln(z)+2*sqr(y)*z)/((abc(x-z)+abc(y-x))^(1/3)+sqr(x)*z)

Comments

[kalapanga]

В Delphi "крышечка" ^ - это совсем не возведение в степень.

[Vitsliputsli]

да, ошибся, тогда так:

n:=(exp(3*ln(x))*ln(z)+2*sqr(y)*z)/exp(1/2*ln((abs(x-z)+abs(y-x)))+sqr(x)*z)