bài tập về hàm trog pascal
2 posters
Trang 1 trong tổng số 1 trang
bài tập về hàm trog pascal
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.
sử dungj hàm đã xây dựng tính:
S=(1^0)+(3^2)+..+(2*n+1)^2*n.
jetlongk4- Thành viên mới
- Ngày sinh : 04/11/1991
Tuổi : 32
Ngày đăng ký : 14/02/2011
Re: bài tập về hàm trog pascal
jetlongk4 đã viết: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.
USES CRT;
VAR X,N,I:INTEGER;
S,A:REAL;
FUNCTION TICH(A:real;X:INTEGER):real;
VAR I:INTEGER;
P:REAL;
BEGIN
P:=1;
FOR I:=1 TO X DO P:=P*A;
TICH:=P;
END;
BEGIN
CLRSCR;
WRITE('A,X: ');
READLN(A,X);
WRITELN('A^X= ',TICH(A,X):0:0);
WRITE('N= ');
READLN(N);
FOR I:=0 TO N DO
BEGIN
A:=0;
A:=TICH(2*I+1,2*I);
S:=S+A;
END;
WRITELN('TONG CAN TINH= ',S:0:0);
READLN;
END.
sieuhoatinh- Thành viên mới
- Ngày sinh : 19/04/1994
Tuổi : 30
Ngày đăng ký : 26/02/2011
Similar topics
» bài tập về hàm trog pascal
» moi người xem giúp bài pascal về đồ thị này với
» GIUP EM MAY BAI PASCAL CO BAN ( EM MOI HOC PASCAL)
» Các bạn giải giúp mình mấy bài tập Pascal này nha ...!
» ai biết gì về đồ họa trong pascal ko giup mình bài này vói nhe
» moi người xem giúp bài pascal về đồ thị này với
» GIUP EM MAY BAI PASCAL CO BAN ( EM MOI HOC PASCAL)
» Các bạn giải giúp mình mấy bài tập Pascal này nha ...!
» ai biết gì về đồ họa trong pascal ko giup mình bài này vói nhe
Trang 1 trong tổng số 1 trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết
|
|
15/4/2011, 10:34 pm by funny
» Mọi người làm giúp tôi bài này với !
13/4/2011, 11:42 am by phonggia
» Giúp mình giải bài này với
12/4/2011, 1:00 pm by ldt
» Chia se 1 bai paccal ve ve do thi
11/4/2011, 1:55 pm by duy_sau_rom
» đồ hoạ trong pascal
9/4/2011, 9:16 pm by jetlongk4
» Giá trị biểu thức bằng kí pháp nghịch đảo
1/4/2011, 8:49 am by kh1132000
» AI GIẢI GIÚP EM BÀI NÀY VỚi , ĐANG CẦN GẤP GẤP LẮM :(
31/3/2011, 11:47 pm by jancancook
» dòng thời gian
31/3/2011, 11:31 am by gianggiangonline
» anh nào giúp em với
30/3/2011, 11:00 pm by sieuhoatinh
» VTC trả lương 10 triệu cho SV tốt nghiệp ĐH Văn Hiến - khoa CNTT - ĐTVT tại Hà Nội
29/3/2011, 2:48 pm by SV_tuonglai
» Download cẩm nang mùa thi 2011 tại đây
29/3/2011, 2:47 pm by SV_tuonglai
» Check giúp mình lỗi trong code này với !
27/3/2011, 10:07 pm by mamap0511
» Tai nghe sony dr 370 ve hang moi
25/3/2011, 8:42 pm by hs_bin
» giúp em với
25/3/2011, 12:11 pm by nbni
» Headphone sony dr 370 moi ve hang
24/3/2011, 9:13 pm by hs_bin
» GIUP EM MAY BAI PASCAL CO BAN ( EM MOI HOC PASCAL)
24/3/2011, 9:11 pm by tuan045610
» Headphone sony DR 370 moi ve hang
21/3/2011, 8:11 pm by hs_bin
» Sony DR 310 moi ve hang
20/3/2011, 9:34 pm by hs_bin
» Mọi người giúp dùm em!!^^
20/3/2011, 9:53 am by trangbui_thcstanhiep
» bài tập về hàm trog pascal
18/3/2011, 10:34 pm by sieuhoatinh