菜鸟问题:x的y次方怎么实现?(短路了!)(50分)

B

boyi_cj

Unregistered / Unconfirmed
GUEST, unregistred user!
菜鸟问题:x的y次方怎么实现?(短路了!)
 
power(x,y)
 
笨方法
function xy(x,y):int64;
var i:int

begin
if y>=1 then

begin

result=x
for i:=1 to y-1 do

result:=result*x
end
else
begin
................
end;


end;
 
re ugvanxk:用power函数就行了
不同意chshanghai的“笨”方法,如果y为浮点数就没戏了
 
function power(n2,n1:integer):longint;
var i:integer;
s:longint;
begin
s:=1;
for i:=1 to n2 do
s:=s*n1;
result:=s;
end;
 
建议使用 power(x,y ) 函数!!!
 
就是power(x,y)就好了呀,很方便的呀!
 
当然别忘了 uses math
 
san_fish
那么,如果是x的0.321次方应该怎么求呢?谢谢
 
顶部