MyException - 我的异常网
当前位置:我的异常网» Delphi » 复合表达式怎么解决?

复合表达式怎么解决?

www.MyException.Cn  网友分享于:2013-02-16  浏览:0次
复合表达式如何解决??求助
     -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);

文章评论

软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有