TẬP THỂ A10

CHÀO MỪNG CÁC BẠN ĐẾN VỚI FORUM CỦA LỚP A10_TRƯỜNG THPT PHAN BỘI CHÂU-CAM RANH-KHÁNH HÒA (2006-2009)
 
Trang ChínhTrang Chính  PortalPortal  GalleryGallery  Trợ giúpTrợ giúp  Đăng kýĐăng ký  Tìm kiếmTìm kiếm  Thành viênThành viên  Đăng NhậpĐăng Nhập  
Mọi người hãy cùng nhau quảng bá 4r đến những thành việc chưa hoạt động, đến bất kỳ ai, những người chưa bik đến 4r hay đã từng bik nhưng chưa tham gia, cùng trường là được, để 4r ta ngày càng lớn mạnh, để mọi người, ai ai cũng biến đến 4r chúng ra

Share | 
 

 đề thi tin nè bà kon ( đã sữa chữa)

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
sasuke_kata
Mod
Mod
avatar

Nam Tổng số bài gửi : 29
Age : 25
Đến từ : bóng tối
Humor : bình thường
Registration date : 22/02/2008

Bài gửiTiêu đề: đề thi tin nè bà kon ( đã sữa chữa)   16/4/2008, 21:40

Bài 1: tính x giai thừa y giai thừa z giai thừa
uses crt;
var x,y,z:byte;
function gt(a:byte):longint;
var gt1:longint;
i:byte;
begin
gt1:=1;
for i:=1 to a do
gt1:=gt1*i;
gt:=gt1;
end;
begin
clrscr;
write('nhap so thu nhat: ');readln(x);
write('nhap so thu hai: ');readln(y);
write('nhap so thu ba: ');readln(z);
write('ket qua cua ',x,'! ',y,'! ',z,'! la ',gt(x) gt(y) gt(z));
readln
end.

Bài 2: Tính a1 mủ b1 + a2 mủ b2 + a3 mủ b3.
uses crt;
var a1,b1,a2,b2,a3,b3:byte;
function mu(a,b:byte):longint;
var i:byte;
c:longint;
begin
c:=1;
for i:=1 to b do
c:=c*a;
mu:=c;
end;
begin
clrscr;
write('nhap co so va mu so thu nhat: ');readln(a1,b1);
write('nhap co so va mu so thu hai: ');readln(a2,b2);
write('nhap co so va mu so thu ba: ');readln(a3,b3);
if ((a1=0) and (b1=0)) or ((a2=0) and (b2=0)) or ((a3=0) and (b3=0)) then
write('nhap sai')
else
write('ket qua la cua ‘,a1,’^’,b1,’ ‘,a2,’^’,b2,’ ‘,a3,’^’,b3,’ la ',mu(a1,b1) + mu(a2,b2) + mu(a3,b3));
readln;
end.

Được sửa bởi admin


Được sửa bởi sasuke_kata ngày 17/4/2008, 16:57; sửa lần 2.
Về Đầu Trang Go down
Xem lý lịch thành viên http://360.yahoo.com/sasuke_kata
bunhinrom_9000
Mod
Mod
avatar

Nữ Tổng số bài gửi : 419
Age : 26
Đến từ : 11a10
Registration date : 26/02/2008

Bài gửiTiêu đề: thank nhiu` nhiu lem   16/4/2008, 21:50

POc' bai` tin thiank Ong^ nhiu` lop truong HS! cuu nguy cho pa con

_________________
Về Đầu Trang Go down
Xem lý lịch thành viên http://360.yahoo.com/my_profile-_ak.RTMzbqivIlb.jP1hVqlBm_H2UQ--
ronni_crazy2000
Admin
Admin
avatar

Nam Tổng số bài gửi : 565
Age : 26
Đến từ : làng S.0.S
Registration date : 24/02/2008

Character sheet
aaa:

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   16/4/2008, 23:08

vjệt oy, coj lạj baj` lũy thừa, 0^0 nó hjểu là 1 chứu ko phải là vô nghja~
Về Đầu Trang Go down
Xem lý lịch thành viên http://tapthea10.go-forum.net
Admin
Admin
Admin
avatar

Nam Tổng số bài gửi : 433
Age : 25
Đến từ : http://tapthea10.go-forum.net
Registration date : 20/02/2008

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 11:20

bai 2 de sao vay, sao tao doc cha hieu.

_________________
Về Đầu Trang Go down
Xem lý lịch thành viên http://tapthea10.go-forum.net
vyheroinking
Thủ Lĩnh Cờ Đen
Thủ Lĩnh Cờ Đen
avatar

Nam Tổng số bài gửi : 169
Age : 25
Đến từ : seven days
Registration date : 22/02/2008

Character sheet
aaa:

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 20:11

bà kon cứ cộng 3 cái mũ lại thì ta được 1 cái nón
Về Đầu Trang Go down
Xem lý lịch thành viên http://www.freeweb.com/trantrongvy
huongxuan
Smod
Smod
avatar

Nữ Tổng số bài gửi : 579
Age : 26
Đến từ : 11a10
Registration date : 23/02/2008

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 21:06

tui nghĩ chỗ mũ 0 hoặc cơ số 0 thì làm riêng 1 trường hợp ban đầu xét trường hợp đặc biệt, a ^ 0 = 1, 0 ^ b = 0 đó

_________________
"suit l'amour l'amour fuit, fuit l'amour l'amour suit"
Về Đầu Trang Go down
Xem lý lịch thành viên http://360.yahoo.com/nguyen_huong_xuan
huongxuan
Smod
Smod
avatar

Nữ Tổng số bài gửi : 579
Age : 26
Đến từ : 11a10
Registration date : 23/02/2008

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 21:12

má ơi, cái đề tính tổng lũy thừa mà bài nó làm hok có tính tổng, ông ơi là ông, chết tụi tui

_________________
"suit l'amour l'amour fuit, fuit l'amour l'amour suit"
Về Đầu Trang Go down
Xem lý lịch thành viên http://360.yahoo.com/nguyen_huong_xuan
xuyenzero
Smod
Smod
avatar

Nam Tổng số bài gửi : 85
Age : 26
Đến từ : far far away
Registration date : 23/02/2008

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 21:30

uses crt;
var x,y,z:byte;
m,n,t,s:longint;
procedure gt(a:byte; var b:longint);
var gt1:longint;
i:byte;
begin
gt1:=1;
for i:=1 to a do
gt1:=gt1*i;
b:=gt1;
end;
begin
clrscr;
write('nhap so thu nhat: ');readln(x);
write('nhap so thu hai: ');readln(y);
write('nhap so thu ba: ');readln(z);
gt(x,m);
gt(y,n);
gt(z,t);
s:=m+n+t;
write('tong la : ',s);
readln;
end.

_________________

(^-^)Bình tỉnh tự tin ko cay cú...âm thầm chịu đựng trả thù sau(^-^)
Về Đầu Trang Go down
Xem lý lịch thành viên
xuyenzero
Smod
Smod
avatar

Nam Tổng số bài gửi : 85
Age : 26
Đến từ : far far away
Registration date : 23/02/2008

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 21:44

uses crt;
var a1,b1,a2,b2,a3,b3:byte;
m,n,t,s:longint ;
procedure mu(a,b:byte; var d:longint);
var i:byte;
c:longint;
begin
c:=1;
for i:=1 to b do
c:=c*a;
d:=c;
end;
begin
clrscr;
write('nhap co so va mu so thu nhat: ');readln(a1,b1);
write('nhap co so va mu so thu hai: ');readln(a2,b2);
write('nhap co so va mu so thu ba: ');readln(a3,b3);
if ((a1=0) and (b1=0)) or ((a2=0) and (b2=0)) or ((a3=0) and (b3=0)) then
write('nhap sai')
else
begin

mu(a1,b1,m);
mu(a2,b2,n);
mu(a3,b3,t);
s:=m+n+t;
write('tong la : ',s);
end;
readln;
end.

_________________

(^-^)Bình tỉnh tự tin ko cay cú...âm thầm chịu đựng trả thù sau(^-^)
Về Đầu Trang Go down
Xem lý lịch thành viên
ronni_crazy2000
Admin
Admin
avatar

Nam Tổng số bài gửi : 565
Age : 26
Đến từ : làng S.0.S
Registration date : 24/02/2008

Character sheet
aaa:

Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   17/4/2008, 23:32

function cho nó dễ hiểu đj ông hộ oy, procedure thấy rac rối khó hjeu wa
Về Đầu Trang Go down
Xem lý lịch thành viên http://tapthea10.go-forum.net
Sponsored content




Bài gửiTiêu đề: Re: đề thi tin nè bà kon ( đã sữa chữa)   

Về Đầu Trang Go down
 
đề thi tin nè bà kon ( đã sữa chữa)
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
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
TẬP THỂ A10 :: THÀNH VIÊN A10 :: TIN TỨC A10-
Chuyển đến