Delphi中N的N次方计算方法

记得以前有个群问过此类问题,恰逢今日Blog新开,公布一下我的方法。其实就是个函数的应用罢了。

高手飘过~~~~~~

 

1 procedure TForm1.Button1Click(Sender: TObject);
2  var
3 f : Real;
4  begin
5 f := Power(2.2,2.2);
6 //f := IntPower(2,2.2);
7 ShowMessage(FloatToStr(f));
8 end;

 

posted @ 2010-06-23 00:44  圣诞大叔  阅读(1287)  评论(0编辑  收藏  举报