如何在delphi中做幂运算，如16的4次方？

Question

如何在delphi中做幂运算，如16的4次方？我采用了power函数，但是函数的参数类型是Extended，那么怎样定义该类型？整型怎样转成Extended？请大家帮忙，谢谢！

Answer 1

uses
  math;
procedure TForm1.Button1Click(Sender: TObject);
var
  x,y: extended;
  z: integer;
begin
  x:=16;
  y:=power(16,4);
  z:=round(y);
  showmessage(inttostr(z));
end;

Answer 2

最好使用IntPower
{ IntPower: Raise base to an integral power.  Fast. }