delphi 中计算1个数的n次幂,代码怎样写?
要求用两个edit控件来分别输入底数和指数,再用button控件单击事件来计算结果。将结果显示在label控件中非常感谢这位高手的回答,只是我想计算任意1个数的任意次幂,...
要求用两个edit控件来分别输入底数和指数,再用button控件单击事件来计算结果。
将结果显示在label控件中
非常感谢这位高手的回答,只是我想计算任意1个数的任意次幂,你这个好象只能计算2的3次方。 展开
将结果显示在label控件中
非常感谢这位高手的回答,只是我想计算任意1个数的任意次幂,你这个好象只能计算2的3次方。 展开
1个回答
展开全部
uses
Math; //这个引用别忘了
var
rst, a, b: Extended;
begin
a := 2;
b := 3;
rst := Power(a, b);
caption := FloatToStr(rst);
end;
稍微改一下就可以了
a := StrToFloat(edit1.text);
b := StrToFloat(Edit2.text);
rst := power(a, b);
label1.caption := FloatToStr(rst);
Math; //这个引用别忘了
var
rst, a, b: Extended;
begin
a := 2;
b := 3;
rst := Power(a, b);
caption := FloatToStr(rst);
end;
稍微改一下就可以了
a := StrToFloat(edit1.text);
b := StrToFloat(Edit2.text);
rst := power(a, b);
label1.caption := FloatToStr(rst);
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询