回 帖 发 新 帖 刷新版面

主题:怎样用PASCAL来算x的n次方!(对的有分加)

怎样用PASCAL来算x的n次方!


[em15]

回复列表 (共4个回复)

沙发

不懂pascal语法
但是调用循环语句,使x自乘n次不就算出来了?

板凳

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 楼

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 楼

上面是i<=n,我打错了...

我来回复

您尚未登录,请登录后再回复。点此登录或注册