Quảng cáo
2 câu trả lời 210
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.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
149631 -
Đã trả lời bởi chuyên gia
99998 -
Đã trả lời bởi chuyên gia
97612 -
Đã trả lời bởi chuyên gia
80300 -
Đã trả lời bởi chuyên gia
73097 -
Đã trả lời bởi chuyên gia
56190 -
Đã trả lời bởi chuyên gia
55568
Gửi báo cáo thành công!
