KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
Viết chương trình nhập vào 2 số nguyên x,n và tính x^n
By Savannah
Viết chương trình nhập vào 2 số nguyên x,n và tính x^n
program phuongt; uses crt; var x, n, i, s: integer; begin clrscr; write(‘Nhap n = ‘); readln(n); write(‘Nhap x = ‘); readln(x); i:=1; s:=1; while i<=n do begin s:=s*x; i:=i+1; end; write(x, ‘ ^ ‘, n ‘ = ‘, s); readln end.
program phuongt;
uses crt;
var x, n, i, s: integer;
begin
clrscr;
write(‘Nhap n = ‘); readln(n);
write(‘Nhap x = ‘); readln(x);
i:=1;
s:=1;
while i<=n do
begin
s:=s*x;
i:=i+1;
end;
write(x, ‘ ^ ‘, n ‘ = ‘, s);
readln
end.
uses crt;
var x,n,i: integer;
k: longint;
begin
clrscr;
write (‘nhap x: ‘); readln (x);
write (‘nhap n: ‘); readln (n);
k:=1;
for i:=1 to n do
k:=k*x;
writeln (x,’^’,n,’ la: ‘,s);
readln;
end.