主题:怎样用PASCAL来算x的n次方!(对的有分加)
泡泡糖
[专家分:230] 发布于 2005-05-04 10:29:00
怎样用PASCAL来算x的n次方!
[em15]
回复列表 (共4个回复)
沙发
FancyMouse [专家分:13680] 发布于 2005-05-03 20:02:00
不懂pascal语法
但是调用循环语句,使x自乘n次不就算出来了?
板凳
aflying [专家分:10] 发布于 2005-05-03 20:47:00
program Ex(input,output);
var x,y,i:real;
begin
write('enter x,y ');
readln(x,y);
i:=exp(y*ln(x));
write(i);
end.
3 楼
sd5774188 [专家分:260] 发布于 2005-05-04 15:46:00
program yb(input,output);
var x,n,i,a:longint;
begin
readln(n,x);
i:=2;
a:=x;
while i<n do
begin
x:=x*a;;
i:=i+1;
end;
writeln('Jieguo=',x);
end.
4 楼
sd5774188 [专家分:260] 发布于 2005-05-04 15:48:00
上面是i<=n,我打错了...
我来回复