Gv: Hồ Thò Thanh An Giáo án Tin học Tuần: 28 Tiết: 55 Ngày soạn: 25/02/2011 Ngày dạy: 05/03/2011 - I Mục tiêu dạy Rèn luyện kỹ viết chương trình có sử dụng lệnh lặp for…do II Đồ dùng dạy học 1.Chuẩn bò Giáo viên Phòng máy có cài sẵn chương trình Pascal 2.Chuẩn bò học sinh Xem lại cú pháp hoạt động câu lệnh lặp for…do III Tiến trình ôn tập Ổn đònh (1’) KTBC: Bài mới: Hoạt động giáo viên * Hoạt động 1: Nhắc lại kiến thức cũ (10 phút) - Hỏi: Viết cú pháp giải thích hoạt động câu lệnh lặp với số lần lặp xác đònh? - Nhận xét giải thích: * Cú pháp: For := to ; *Hoạt động vòng lặp: - Câu lệnh lặp thực câu lệnh sau từ khóa nhiều lần, lần vòng lặp Số vòng lặp biết trước giá trò cuối – giá trò đầu + - Khi thực hiện, ban đầu biến đếm nhận giá trò giá trò đầu, sau vòng lặp biến đếm tự động tăng thêm đơn vò giá trò cuối - Hỏi: Viết cú pháp giải thích hoạt động câu lệnh lặp với số lần lặp không xác đònh? - Nhận xét giải thích: * Cú pháp: While ; * Hoạt động: - Bước 1: Kiểm tra điều kiện - Bước 2: Nếu điều kiện sai, câu lệnh bò bỏ qua việc thực câu lệnh lặp kết thúc Nếu điều kiện đúng, thực câu lệnh quay lại Bước * Hoạt động 2: Bài tập (30 phút) - Bài 1: - Hãy viết chương trình in hình 10 câu “Day la gio hoc Tin hoc!” sử dụng câu lệnh lặp? - Lưu chương trình với tên Bai tap - Chạy chương trình quan sát kết - Hướng dẫn, gợi mở - Gọi học sinh lên bảng viết chương trình giải thích câu lệnh chương trình Năm học 2010-2011 Hoạt động học sinh - Lên bảng viết cú pháp giải thích hoạt động - Lắng nghe - Lên bảng viết cú pháp giải thích hoạt động - Chú ý theo dõi - Thực theo yêu cầu - Một học sinh lên bảng viết chương trình giải thích Gv: Hồ Thò Thanh An Giáo án Tin học - Gọi học sinh khác nhận xét - Học sinh khác nhận - Sửa chữa (nếu sai) đưa chương trình đúng: xét Program Vonglap; - Kiểm tra chương Var i: integer; trình Begin sửa lại cho For i:=1 to 10 Writeln(‘Day la gio hoc Tin hoc!'); readln End - Quan sát, hướng dẫn học sinh thực - Bài 2: - Viết chương trình in hình tên giáo viên có sử dụng câu lệnh lặp, cụ thể chương trình cho phép nhập tên giáo viên chạy chương trình? - Lưu chương trình với tên Bai tap - Thực theo yêu - Chạy chương trình quan sát kết cầu - Hướng dẫn, gợi mở - Một học sinh lên - Gọi học sinh lên bảng viết chương trình giải thích câu lệnh bảng viết chương chương trình trình giải thích - Gọi học sinh khác nhận xét - Học sinh khác nhận - Sửa chữa (nếu sai) đưa chương trình đúng: xét Program in_ten; - Kiểm tra chương Var i: integer; ten:string; trình Begin sửa lại cho For i:=1 to Begin Write(‘Nhap ten GV:’); readln(ten); Writeln(‘Ten toi la:',ten); End; readln End - Quan sát, hướng dẫn học sinh thực Củng cố (3’): - Nhận xét đánh giá tiết tập - Lưu ý số tồn tiết tập Dặn dò (1’): Bài tập nhà: Hãy viết chương trình tính tổng số tự nhiên từ đến 100 (Sử dụng vòng lặp với số lần không xác đònh)? Năm học 2010-2011 ... cụ thể chương trình cho phép nhập tên giáo viên chạy chương trình? - Lưu chương trình với tên Bai tap - Thực theo yêu - Chạy chương trình quan sát kết cầu - Hướng dẫn, gợi mở - Một học sinh lên