Программа для расчета линейного арифметического выражения!

[Vyacheslav.]

Вроде бы написал все правильно, но компилятор выбивает ошибки... Подскажите что не так?

procedure TForm1.Button1Click(Sender: TObject);
var y, s, x,  z, d:real;
 a: Extended;
begin
x:=-4.5;
y:=0.75*a;
z:=-0.845*SQR(10);
a:= Power(10, -4);
d:=9+SQR(x-y);
  ShowMessage(FloatToStr(a));
s:=power(d,1/3)/(SQR(x)+SQR(y)+2)-exp(abc(x-y))*power(tg,3)*z;
Edit1.Text:=floattostr(s);
Edit1.Text := Format('%1.4f', [((power(d,1/3)/(SQR(x)+SQR(y)+2)-exp(abc(x-y))*power(tg,3)*z]);
end;

Ему что-то не нравится в самой формуле s:=power(d,1/3)/(SQR(x)+SQR(y)+2)-exp(abc(x-y))*power(tg,3)*z;
Ошибки:
[Error] Unit1.pas(39): Invalid typecast
[Error] Unit1.pas(41): Invalid typecast
[Error] Unit1.pas(41): ')' expected but ']' found
[Fatal Error] Project2.dpr(5): Could not compile used unit '..\Unit1.pas'

[Аватар]

power(tg,3)*z

[Vyacheslav.]

И? Тангенс в кубе умноженный на Z, как и в формуле, вроде правильно..

[Аватар]

Ну включи процессор )) Что такое тангенс, какие аргументы у этой функции

[Vyacheslav.]

С математикой плохо. Так что ли?
power(tan(z),3);

[Vyacheslav.]

Вообще оно жалуется на этот момент.. Умножения на Power..

[p51x]

tan*z это совсе не то, что tan(z)

[Аватар]

power(tan*z,3) уже теплей, но не то ))

[Vyacheslav.]

а смотря на скрин вы уверены что ошибка не в умножении на power? Обварачивал его в скобки - не помогло.

[p51x]

Нет, проблема не в повер. Проблема в том, что вы неправильно вызываете функцию.