本文整理自网络,侵删。
X 的 Y 次方
var
x,y,z: Real;
begin
x := 2;
y := 3;
{ 使用 Math.Power }
z := Math.Power(x, y);
ShowMessage(FloatToStr(z)); //8
{ 不想 uses Math, 就用 System.Exp、System.Ln }
z := Exp(Ln(x) * y);
ShowMessage(FloatToStr(z)); //8
end;
相关阅读 >>
Delphi实现win10下Delphi 10.3.1 inline hook 调试器法获取寄存器并修改
Delphi application.restore; 简单用法
Delphi controls 属性与继承 tshape 类的小练习
更多相关阅读请进入《Delphi》频道 >>