Tin học Chương trình tính lũy thừa

[Nguyễn Tùng Ân]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Buồn buồn lên diễn đàn đăng bài
Viết chương trình tính lũy thừa của một số
Nhập: cơ số và số mũ
Xuất: kết quả lũy thừa
Ví dụ:
Nhap co so: a
Nhap so mu:b
ket qua: a^b = .....

 

[namnam06]

Program luythua;
Var a,b,i : integer;
S : longint;
Begin
Write('Nhap co so: ');Readln(a);
Write('Nhap so mu: '); Readln(b);
S:=1;
For i:= 1 to b do S:=S*a;
Writeln('Ket qua: ',S);
End.