при исходных данных:
X = -2,48
Y = -3,79
Z = 12,05

выражение я прикрепил в виде рисунка,а вот собственно и код:

program Lab1;
 uses crt;
 var
   x,y,z,b:real;
 begin
   x:=-2.48;
   y:=-3.79;
   z:=12.05;
   b:=sqr((exp(exp((1/3)*ln(abs(y))))+exp(-1*exp((1/3)*ln(abs(y)))))/2)+
   exp(3*ln((exp(sqrt(abs(x)))-exp(-sqrt(abs(x))))/2))-exp(1);
   writeln('b=',b:10:5);
   readln;
 end.

оно то работает,только препод говорит что ответ другой получается,около 5..у меня подозрение что я неправильно вычисляю натуральный логарифм от y
но другого способа посчитать я не знаю..
З.ы. ch и sh Это гиперболические синус и косинус соответственно.

Гости не могут прикреплять файлы.
Так что, видимо, придется зарегистрироваться и выложить рисунок.

извините,вчера регистрировался,но че то писало что пасс не подходит.вот условие:

Y = -3,79

-3,79^(1/3)

и

+3,79^(1/3)

Это совсем разные числа ...

Это то понятно,но если убрать модуль то получится ln от Y,а Y-отрицательное число...вот в этом и загвоздка...

(y / abs(y)) * exp((1/3) * ln(abs(y))) даст тебе необходимый знак результата

да тут даже не в знаке дело,как я понимаю...если делать как предлагает volvo,то получается тот же ответ...
блин,пример плевый,но неправильно! может дело и не в этом месте,не могли бы проверить весь пример полностью..

Скажи своему преподавателю, пускай учится считать...

Вручную: ch² (-3.79)^1/3 = 6.155
sh³ 2.48^1/2 = 12.348
e¹ = 2.718

Суммируем: 6.155 + 12.348 - 2.718 = 15.785

Что там выдает твоя программа?

Добавлено через 4 мин.
P.S. А вот если в формуле имелось в виду вычитание не Exp(1), а именно Z (не зря же оно дано все-таки), то получится как раз около 5... Уточни у него формулу...

15,792-тоже самое короче..он видишь ли это сам все придумывал и ответы у него тоже записаны...нет чтобы сесть разобраться,может у него опечатка,он просто говорит, что неправильно и возвращает...и из за этого не дает допуск к экзамену..

а вот когда "вручную" как же там посчитать (-3.79)^1/3?

Кубический корень из (-3.79) посчитай...