Giáo án Tin học 8 - Bài 9: Làm việc với dãy số (Tiết 2) - Năm học 2009-2010 - Bùi Đặng Duy Linh

GSTT:Bùi Đặng Duy Linh	 GVHD: Mai Thị Bích Vân
Ngày soạn:16/03/2010	Ngày dạy:22/03/2010
Bài 9. Làm việc với dãy số (T2)
I - MỤC TIÊU
1. Kiến thức
- Biết được khái niệm mảng một chiều
- Biết cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
2. Kỹ Năng
- Hiểu thuật toán tìm số lớn nhất, nhỏ nhất của một dãy số.
II. CHUẨN BỊ
1. Giáo viên: giáo án, hình ảnh minh họa,SGK
2. Học sinh: Kiến thức cũ, SGK, vở,viết
III - PHƯƠNG PHÁP
- Thuyết trình, giảng giải, vấn đáp.
IV - TIẾN TRÌNH LÊN LỚP
A - ỔN ĐỊNH LỚP,KIỂM TRA SỈ SỐ (1’)
B - KIỂM TRA BÀI CŨ 3’
(?) Em hãy nêu cách khai báo biến mảng trong Pascal .
C - BÀI MỚI (37’)
HOẠT ĐỘNG CỦA THẦY VÀ TRÒ
NỘI DUNG KIẾN THỨC
Hoạt động 1: 20’
GV: Yêu cầu HS xem lại Ví dụ 6-Trang 43
HS: Đọc ví dụ và nhớ lại kiến thức cũ
GV:nhắc lại về thuật toán tìm giá trị lớn nhất của dãy số nguyên 
HS: Chú ý và trình bày lại thuật toán tìm số lớn nhất
GV:Yêu cầu học sinh thảo luận chỉnh sửa thuật toán trên để tìm ra số nhỏ nhất của dãy số.
HS:thảo luận và đưa ra câu trả lời
GV:Tại sao máy tính lại phải sử dụng thuật toán như vậy để tìm ra được số lớn nhất,nhỏ nhất
GV:viết lên bảng dãy số bất kỳ chẳng hạn 1,9,23,5,8
Yêu cầu HS tìm số lớn nhất.nhò nhất trong dãy số
Hoạt động 2: 17’
GV: Đưa ví dụ 3
HS: Đọc hiểu ví dụ
GV: Hướng dẫn học sinh cách sử dụng biến mảng
+Cách khai bao các biến cần
+Nhập gia trị cho mảng
+Tìm Max,Min
+Hiển thi Max,Min ra man hình
HS: Chú ý
- Ghi vở và thực hiện chương trình.
GV:lưu ý số phần tử tối đa của mảng còn gọila2 kích thước mảng phải khai báo cụ thể
HS:lắng nghe và ghi chép
Thuật toán tìm Max:
INPUT: Dãy A các số a1,a2,..,an(n>=1)
OUTPUT:MAX cua dãy A
B1:MAX ßa1;iß1
B2:ißi+1;
B3:Nếu i>n, đến B5
B4:Nếu ai>MAX,MAXßa,Quay lại B2.
B5:Kết thúc thuật toán
3. Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Ví dụ 3. (SGK) Phần khai báo của chương trình có thể như sau: 
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.
	D - CỦNG CỐ (3’)
- Giải bài tập SGK trang 79
- Cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
E - HƯỚNG DẪN VỀ NHÀ (1’)
- Về nhà xem lại bài học để tiết sau thực hành
IV – RÚT KINH NGHIỆM
***********************************************************