Em hãy viết chương trình tính lũy thừa bậc n của số nguyên X

0 bình luận về “Em hãy viết chương trình tính lũy thừa bậc n của số nguyên X”

1. Program BTT;
   Uses crt;
   Var n,x: int64;
       s: extended;
   Begin
           Clrscr;
           Write(‘Nhap x: ‘); Readln(x);
           Write(‘Nhap n: ‘); Readln(n);
           s:=exp((n)*ln(x));
           Write(x,’^’,n,’ = ‘,s:0:2);
           Readln
   End.

   Bình luận

2. Trả lời :

   Program xmun 

   Ues crt

   Var i, x, n, kq: longint; 

   Begin 

   Clrscr 

   Writeln(‘ Chuong trinh tinh X^n’);

   Write(‘X=’); readln(X) 

   kq:=1

   fori:=1to n do

   kq:=kq*X; 

   Writeln(X; ‘^’,n, ‘=’,kq); 

   Readln

   End 

   Bình luận