bài tập về hàm trog pascal

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down

bài tập về hàm trog pascal

Bài gửi by jetlongk4 on 15/3/2011, 7:38 am

xây dựng hàm tính a^x.
sử dungj hàm đã xây dựng tính:
S=(1^0)+(3^2)+..+(2*n+1)^2*n.
và ý này nữa/
S=(2^1)+(4^3)+..+(2*n)^2*n-1
avatar
jetlongk4
Thành viên mới
Thành viên mới

Nam Ngày sinh : 04/11/1991
Tuổi : 25
Ngày đăng ký : 14/02/2011

Về Đầu Trang Go down

Re: bài tập về hàm trog pascal

Bài gửi by nbni on 15/3/2011, 1:15 pm

hàm tính a^x:
var a,x,p:longint;
function luythua(a,x:integer):longint;
var tich,i:integer;
begin
tich:=1;
for i:=1 to x do tich:=tich*a;
luythua:=tich;
end;
begin
readln(a,x);
p:=luythua(a,x);
write(p);
readln
end.
avatar
nbni
Thành viên mới
Thành viên mới

Nữ Ngày sinh : 12/08/1995
Tuổi : 22
Ngày đăng ký : 18/02/2011

Về Đầu Trang Go down

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang

- Similar topics

 
Permissions in this forum:
Bạn không có quyền trả lời bài viết