GVHD : LÂM THANH VI TỆ SVTT : DANH PH NGƯƠ
VŨ
Ngày so n : 28 – 02 – 2010ạ
Ngày d y : 04 – 03 – 2010ạ
L p d y : 8A1ớ ạ
GIÁO ÁN TIN H C 8Ọ
Bài 9: LÀM VI C V I DÃY S (tt)Ệ Ớ Ố
I. M C TIÊU:Ụ
1. Ki n th cế ứ
- Bi t đ c khái ni m m ngế ượ ệ ả
- Hi u thu t toán tìm s l n nh t và nh nh t c a dãy sể ậ ố ớ ấ ỏ ấ ủ ố
2. K năngỹ
- Bi t cách khai báo m ng, nh p in, truy c p các ph n t c a m ngế ả ậ ậ ầ ử ủ ả
- Vi t đ c đo n ch ng trình có s d ng bi n m ng bài toán đ n gi n.ế ượ ạ ươ ử ụ ế ả ở ơ ả
3. Thái đ ộ
- Rèn luy n t duy khoa h c, t duy logic.ệ ư ọ ư
- Rèn luy n ý th c h c t p, ham thích tìm hi u. ệ ứ ọ ậ ể
II. CHU N B :Ẩ Ị
1. Giáo viên:
-SGK, giáo án, phòng máy tính đã đ c cài s n Tubo Pascal, b ng ph .ượ ẵ ả ụ
2. H c sinhọ
SGK, đ dùng h c t p…ồ ọ ậ
III. HO T Đ NG D Y VÀ H C:Ạ Ộ Ạ Ọ
Giáo án Tin h cọ Tr ng THCS Mườ ỹ
Xuyên
GVHD : LÂM THANH VI TỆ SVTT : DANH PH NGƯƠ
VŨ
Giáo án Tin h cọ Tr ng THCS Mườ ỹ
Xuyên
Ho t đ ng c a GV và HSạ ộ ủ N i dung ộ
GV: Cho HS đ c ví d 3 Sgk.ọ ụ
- GV gi i thích thu t toán tìm giá tr l n nh t:ả ậ ị ớ ấ
+ Đ u tiên gán giá tr s th nh t c a dãy sầ ị ố ứ ấ ủ ố
cho Max (ban đ u t m th i coi s th nh t làầ ạ ờ ố ứ ấ
s ốl n nh t t m th iớ ấ ạ ờ ).
+ So sánh s l n nh t t m th i này v i số ớ ấ ạ ờ ớ ố
th 2, n u s th 2 l n h n s th nh t t mứ ế ố ứ ớ ơ ố ứ ấ ạ
th i-Max thì gán giá tr c a s th 2 cho Max.ờ ị ủ ố ứ
Nh v y, đ n th i đi m này, Max là s l nư ậ ế ờ ể ố ớ
nh t c a s th 1 và s th 2.ấ ủ ố ứ ố ứ
+ C ti p t c nh v y, đem so sánh Max v iứ ế ụ ư ậ ớ
t t c các s còn l i, g p s nào l n h n Maxấ ả ố ạ ậ ố ớ ơ
thì l i gán giá tr c a s đó cho Max. Sau khi soạ ị ủ ố
sánh đ n s cu i cùng c a dãy s thì Maxế ố ố ủ ố
chính là giá tr l n nh t c a dãy s .ị ớ ấ ủ ố
GV: Yêu c u HS trình bày l i thu t toán.ầ ạ ậ
GV: Cho HS th o lu n nhóm đ nghiên c uả ậ ể ứ
cách vi t ch ng trình d a trên các câu h i:ế ươ ự ỏ
+ Hãy nêu yêu c u c a ch ng trình?ầ ủ ươ
+ Trong ch ng trình đã khai báo nh ng bi nươ ữ ế
gì? Nêu tác d ng c a t ng bi n? Phân lo i cácụ ủ ừ ế ạ
bi n?ế
+ Theo em m ng A có bao nhiêu ph n t ?ả ầ ử
+ Hãy gi i thích các câu l nh trong ph n thânả ệ ầ
c a ch ng trình?ủ ươ
HS: Các nhóm HS th o lu n và c đ i di n trả ậ ử ạ ệ ả
l i.ờ
GV: Nh n xét và đ a ra k t lu n.ậ ư ế ậ
GV: Trong ch ng trình v a nghiên c u ta l uươ ừ ứ ư
ý:
- S ph n t c a m ng ph i đ c khai báoố ầ ử ủ ả ả ượ
b ng m t s c th .ằ ộ ố ụ ể
GV: Nh n m nh: Qua ví d ta th y s khácấ ạ ụ ấ ự
bi t gi a ng i và máy tính khi gi i quy tệ ữ ườ ả ế
công vi c. Trong nhi u tình hu ng con ng iệ ề ố ườ
gi i các bài toán hi u qu h n nhi u máy tính.ả ệ ả ơ ề
Còn máy tính l i h n h n con ng i đ i v iạ ơ ẳ ườ ố ớ
nh ng tính toán s l n ho c v i s nhi u…ữ ố ớ ặ ớ ố ề
3. Ví d : Tìm giá tr l n nh tụ ị ớ ấ
và nh nh t c a dãy s .ỏ ấ ủ ố
* Ví d 3:ụ (SGK).
program MaxMin;
uses crt;
Var
i, n, Max, Min:
integer;
A: array[1..100] of
integer;
Ph n thân ch ng trình sầ ươ ẽ
t ng t d i đây:ươ ự ướ
Begin
clrscr;
write('Hay nhap do
dai cua day so, N =
'); readln(n);
writeln('Nhap cac
phan tu cua day so:');
For i:=1 to n do
Begin
write('a[',i,']=
');
readln(a[i]);
End;
Max:=a[1];
Min:=a[1];
for i:=2 to n do
begin
if Max<a[i]
then
Max:=a[i];
if Min>a[i]
then
Min:=a[i];
end;
write('So lon nhat
la Max = ',Max);
write('; So nho
nhat la Min = ',Min);
readln
End.
*L u ý:ư S các ph n t c aố ầ ử ủ
m ng (ảkích th c c a m ng)ướ ủ ả
c n đ c khai báo b ng m t sầ ượ ằ ộ ố
c th .ụ ể
GVHD : LÂM THANH VI TỆ SVTT : DANH PH NGƯƠ
VŨ
IV. C NG C VÀ D N DÒ:Ủ Ố Ặ
- V nhà đ c và tìm hi u m t s ch ng trình trong Pascal có khai báo và s d ngề ọ ể ộ ố ươ ử ụ
bi n m ng.ế ả
- T p vi t m t s câu l nh khai báo bi n m ng, ôn luy n cách s d ng các câuậ ế ộ ố ệ ế ả ệ ử ụ
l nh l p.ệ ặ
- Nh l i các kĩ năng đ c, hi u và ch nh s a ch ng trình.ớ ạ ọ ể ỉ ử ươ
- Làm các câu h i và bài t p cu i bài trong Sgk.ỏ ậ ố
M Xuyên, ngày / / 2010 ỹ
Ng i duy t Ng i so nườ ệ ườ ạ
GVHD : LÂM THANH VI T Ệ SVTT : DANH PH NG VŨƯƠ
Giáo án Tin h cọ Tr ng THCS Mườ ỹ
Xuyên