Giải bởi Vietjack
Lời giải:
var n, x,i,k: longint ;
begin
Write('So mu N= '); readln(n);
write('X= ');readln(x)
i:=0;k:=1;
while i<=n do
begin
k:=k*x;
i:=i+1;
end;
write(k,' ')
readln
end.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
