Nhập a bằng 5 và x = 7 Cho chạy và chụp ảnh màn hình kết quả 5 lũy thừa 7 Giúp mk với ạ, mk cảm ơn
2 câu trả lời
program nguyenkhanhha610;
uses crt;
var i, a, x, r: longint;
begin
ClrScr;
Write ('Nhập a = '); readln(a);
Write ('Nhập x = '); readln(x);
r := 1;
for i := 1 to x do r := r * a;
Writeln ('a^x = ', r);
end.
$#QLinkVN$
CẤU TRÚC CHƯƠNG TRÌNH CỤ THỂ NHƯ SAU:
program lmaoooo;
uses crt;
var a,x,i,k: longint;
begin
clrscr;
writeln('Nhap gia tri nguyen a: '); readln(a);
writeln('Nhap so mu x: '); readln(x);
k:=1;
for i:=1 to x do k:=k*a;
writeln('Gia tri cua so la: ',k);
readln;
end.
MÀN HÌNH KẾT QUẢ CÙNG VỚI CODE CÓ TRÊN MÀN HÌNH!