viết chương trình nhập vào 2 số x,n.Hãy tính x^n Ví dụ nhập x=2, n=3 in ra 2^3=8
2 câu trả lời
uses crt;
var x,n,i,s:longint;
begin
clrscr;
write('Nhap x: '); readln(x);
write('Nhap n: '); readln(n);
s:=1;
for i:=1 to n do s:=s*x;
write(x,'^',n,'=',s);
readln
end.
program ct;
uses crt;
var i,x,n:integer;
T:real;
begin clrscr;
write('Nhap hai so x,n: '); readln(x,n);
T:=1;
for i:=1 to n do
T:=T*x;
writeln(x,'^',n,'=',T);
readln;
end.
Học tốt!
Câu hỏi trong lớp
Xem thêm