Description
求一个实数x的n次整数幂 。(保留小数点后两10位)
Input
x
n
Output
x^n
(结果16位)
程序如下:
-
var y,n:extended; m:longint; procedure ex(x:extended; m:longint); begin if m=0 then y:=1 else begin ex(x,m div 2); y:=y*y; if odd(m) then y:=y*x;//odd(m)相当于(m mod 2)=1 end; end; begin readln(n); readln(m); ex(n,m); write(y:0:10); end.