dụng biến mảng: - Viết lại cách khai báo biến - Có thể thay rất nhiều của ví dụ trên với số học sinh câu lệnh lặp và in dữ tối đa của lớp là 40.. liệu bằng một câu lệnh - Cách khai báo v[r]
(1)GIÁO ÁN TIN HỌC Tiết PPCT: 21 (HKII) Ngày soạn: 7/3/2010 Ngày dạy: §9 LÀM VIỆC VỚI DÃY SỐ TG 5’ TG 10’ I Mục tiêu: - Làm quen với việc khai báo và sử dụng các biến mảng - Biết cách tìm giá trị lớn và giá trị nhỏ dãy số - Rèn luyện kĩ tìm giá trị lớn và giá trị nhỏ dãy số II Chuẩn bị: GV: Bảng phụ HS: SGK, dụng cụ học tập đầy đủ III Hoạt động dạy học: 1/ Ổn định tổ chức: Yêu cầu hs báo cáo sĩ số, kiểm diện học sinh (1’) 2/ Kiểm tra bài cũ: Hoạt động GV Hoạt động HS Nội dung - Đặt câu hỏi chung cho lớp: - Vấn đáp giáo Dữ liệu mảng là gì? viên, học sinh để ôn lại bài cũ Nêu cách khai báo biến mảng? - Y/c Hs trả lời các câu hỏi trên - HS trả lời, ghi - Nhóm HS nhận xét, bảng đánh giá HS trả lời câu - Y/c Hs nhận xét, đánh giá - Hai HS nhận xét, hỏi đánh giá HS trả lời câu hỏi và đề nghị điểm số - Nhận xét, đánh giá điểm số 3/ Bài mới: Hoạt động GV Hoạt động HS Nội dung Ví dụ biến mảng: Hoạt động 1: Tìm hiểu Ví dụ biến mảng (tt) Lợi ích việc sử - Yêu cầu HS đọc ví dụ - Đọc ví dụ dụng biến mảng: - Viết lại cách khai báo biến - Có thể thay nhiều ví dụ trên với số học sinh câu lệnh lặp và in tối đa lớp là 40 liệu câu lệnh - Cách khai báo và sử dụng lặp VD: For i:=1 to 50 - Có thể thay nhiều câu readln(Diem[i]); biến trên có lợi gì? - Giải thích lợi ích việc lệnh lặp và in liệu - Sử dụng biến mảng câu lệnh lặp VD: For sử dụng biến mảng, cách hiệu i:=1 to 50 readln(Diem[i]); xử lý liệu VD For - Sử dụng biến mảng cách i:=1 to 50 hiệu xử lý liệu if Diem[i]>8.0 then VD For i:=1 to 50 Writeln (‘Gioi’); hay if Diem[i]>8.0 then Writeln khai báo nhiều biến: (‘Gioi’); hay khai báo nhiều Var Toan, Van, li: array biến: Var Toan, Van, li: array [1 50] of real; gán giá [1 50] of real; gán giá trị cho trị cho các phần tử các phần tử biến mảng: biến mảng: A[1]:=5; A[1]:=5; A[2]:=9; A[2]:=9; Trang Lop8.net (2) 20’ Hoạt động 2: Tìm hiểu cách tìm giá trị lớn và giá trị nhỏ dãy số - Ví dụ 3: Viết chương trình nhập vào dãy số nguyên n và in màn hình số lớn nhất, nhỏ - Hãy trình bày cách khai báo Program MaxMin; uses crt; biến chương trình? Var i, n, Max, Min: integer; A: array[1 100] of integer; - Phần thân chương trình phải Begin viết nào? clrscr; write('Hay nhap dai cua day so, = '); readln(n); writeln('Nhap cac phan tu cua day so:'); For i:=1 to n Begin write('a[',i,']='); readln(a[i]); End; Max:=a[1]; Min:=a[1]; for i:=2 to n 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 - Giải thích phần chương trình: Phần nhập giá trị cho biến, phần kiểm tra các giá trị mảng để tìm số lớn - Lắng nghe nhất, nhỏ Củng cố, dặn dò: TG Tìm giá trị lớn và giá trị nhỏ dãy số: program MaxMin; uses crt; Var i, n, Max, Min: integer; A: array[1 100] of integer; Begin clrscr; write('Hay nhap dai cua day so, = '); readln(n); writeln('Nhap cac phan tu cua day so:'); For i:=1 to n Begin write('a[',i,']='); readln(a[i]); End; Max:=a[1]; Min:=a[1]; for i:=2 to n 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 Hoạt động GV Hoạt động HS Nội dung - Hs trả lời số câu 9’ * Củng cố: - Lợi ích việc sử dụng biến mảng - Hs trả lời và nhận xét hỏi GV đặt * Dặn dò: câu hỏi GV - Chuẩn bị bài tập từ 4, sgk trang 79 và bài thực hành Trang Lop8.net (3) Trang Lop8.net (4)