复合表达式怎么解决？

复合表达式如何解决？？求助
     -40000+10000*（1+13%）^-1+10000+(1+13%)^-2=？

注:^-1(-2)表示幂次方


那位大侠知道这个复合表达式DELPHI 如何写出来？？谢谢了
------解决方案--------------------------------------------------------
uses Math;
var
  a:Extended;
begin
  a:=-40000+10000*(1/1.13)+10000+(1/1.13/1.13);
end;
------解决方案--------------------------------------------------------

引用:

var
   a:Extended;
 begin
   a:=-40000+10000*(1/1.13)+10000+(1/1.13/1.13);
   edt1.Text:=a;//为什么最后显示报错误呢？？
 end;  

xiexie 大侠

你的Edt1.Text是字符串型，而你的变量a是Extended，怎么能直接赋值呢。。。
保留两位小数：
edt1.Text:= FormatFloat('0.00',a);
或者你直接转化为字符串型：
edt1.Text:= FloatToStr('0.00',a);


------解决方案--------------------------------------------------------
不好意思，点的太快了。。。

最后一个应该是 edt1.Text:= FloatToStr(a);