+ GV: Yêu cầu Hs đưa ra các ví dụ + HS: Dựa vào đời sống thực tế khác về các công việc lặp đi lặp lại nêu ví dụ thể hiện công việc lặp với số lần chưa được biết trước.. với số lần chưa đ[r]
(1)Tuần 25 Tiết: 49 Ngày soạn: 03/03/2013 Ngày day: 05/03/2013 Bài LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC I Mục tiêu: Kiến thức: - Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước ngôn ngữ lập trình; - Biết ngôn ngữ lập trình dùng cầu trúc lặp với số lần chưa biết trước để dẫn máy tính thực lặp lặp lại công việc nào đó thỏa mãn Kĩ năng: - Viết đúng lệnh while … … số tình đơn giản Thái độ: Học tập nghiêm túc, có ý thức tự giác, tinh thần vươn lên vượt qua khó khăn II Chuẩn bị - Gv: Sách giáo khoa, máy tính điện tử, giáo án, máy chiếu - Hs: Vở ghi, sách giáo khoa III Phương pháp: - Gv hướng dẫn, gợi mở, phát và giải vấn đề Hs vấn đáp làm việc nhóm IV Tiến trình bài dạy: Ổn định lớp: (1’) 8A1: 8A2: Kiểm tra bài cũ: (5’) Câu hỏi: Trình bày cú pháp câu lệnh lặp với số lần đã biết trước? Nội dung bài mới: HOẠT ĐỘNG CỦA GIÁO VIÊN VÀ HỌC SINH GHI BẢNG Hoạt động 1: (15’) Các hoạt động Các hoạt động lặp với lặp với số lần chưa biết trước số lần chưa biết trước + GV: Đưa số ví dụ + HS: Quan sát, chú ý lắng nghe, - Xem SGK/67 sống ngày, nhiều hoạt ghi nhận các các ví dụ, tìm hiểu động thực lặp lặp lại thêm thông tin với số lần chưa biết trước + GV: Yêu cầu Hs đưa các ví dụ + HS: Dựa vào đời sống thực tế khác các công việc lặp lặp lại nêu ví dụ thể công việc lặp với số lần chưa biết trước với số lần chưa biết trước + GV: Đưa ví dụ + HS: Tìm hiểu thuật toán: - Nếu cộng n số tự nhiên Bước S 0, n đầu tiên (n = 1, 2, 3, ), ta Bước Nếu S ≤1000 , n ←n+1 T1=1, T2=1+2, T3=1+2+3, tăng Ngược lại, chuyển tới bước dần Cộng bao nhiêu để tổng T n nhỏ Bước S S + n và quay lại lớn 1000? bước - Hướng dẫn Hs tìm hiểu thuật Bước In kết Kết thúc thuật ví dụ toán + GV: Giới thiệu cho Hs + HS: Quan sát chương trình chương trình Pascal nhập tên Gv đưa và tìm hiểu + GV: Dựa trên chương trình này, + HS: Quan sát hình 39 Lắng Gv giới thiệu cú pháp, sơ đồ hoạt nghe Gv giải thích hoạt động động câu lệnh While lặp với số lần chưa xác định + GV: Rút nhận xét kết luận cho + HS: Tập trung chú ý lắng nghe học sinh Ghi nhớ kiến thức Hoạt động 2: (23’) Ví dụ lệnh Ví dụ lệnh lặp với số (2) lặp với số lần chưa biết trước + GV: Đưa cấu trúc câu lệnh lặp với số lần chưa biết trước Pascal + GV: Giải thích cho Hs các từ khóa While, do, điều kiện và câu lệnh? + GV: Giải thích cách hoạt động câu lệnh lặp + HS: Cú pháp: While <điều kiện> <câu lệnh>; + HS: Trong đó: - Điều kiện: thường là phép so sánh; - Câu lệnh có thể là câu lệnh đơn hay câu lệnh ghép + HS: Thực sau: Kiểm tra điều kiện Nếu điều kiện SAI, câu lệnh bỏ qua, kết thúc lệnh lặp Nếu điều kiện đúng, thực câu lệnh và quay lại bước + HS: Ghi nhớ kiến thức + HS: Đọc và tìm hiểu bài toán ví dụ + HS: Các nhóm thực thảo luận hướng dẫn Gv + HS: Trình bày Input và Output bài toán + HS: Chạy chương trình ta nhận kết n = 334 Thay điều kiện sai_so = 0.002 và sai_so = 0.001, nhận các kết n = 501 và n = 1001 + HS: Đại diện các nhóm trình bày kết thảo luận + HS: Các nhóm khác bổ sung nhận xét kết các nhóm + HS: Lặp với số lần chưa biết trước lần chưa biết trước - Cú pháp: While <điều kiện> <câu lệnh>; - Trong đó: + Điều kiện: thường là phép so sánh; + Câu lệnh có thể là câu lệnh đơn hay câu lệnh ghép - Thực sau: Kiểm tra điều kiện Nếu điều kiện SAI, câu lệnh bỏ qua, kết thúc lệnh lặp Nếu điều kiện đúng, thực câu lệnh và quay lại bước + GV: Nhận xét chốt nội dung + GV: Đưa ví dụ SGK cho Hs nhận biết + GV: Chia nhóm thảo luận Trình bày thuật toán ví dụ + GV: Yêu cầu Hs phân tích bài toán ví dụ + GV: Các nhóm gõ đoạn chương trình và thay điều kiện sai_so = 0.003 lần lược là sai_so = 0.002 và sai_so = 0.001, quan sát nhận biết kết + GV: Đại diện các nhóm trình bày nội dung thảo luận + GV: Các nhóm khác nhận xét bổ sung + GV: Cách mô tả các hoạt động lặp thuật toán ví dụ trên gọi là gì? Củng cố: - Củng cố nội dung bài học Hướng dẫn và dặn dò nhà: (1’) - Học bài kết hợp SGK - Đọc trước nội dung phần bài Rút kinh nghiệm: Program Chao_hoi; Uses Crt; Var Tieptuc: Char; (3) Ten: String; Begin Tieptuc:= ‘c’; While Tieptuc = ‘c’ Begin Write(‘Nhap ten: ’); Readln(Ten); Writeln(‘Chao ban ’, Ten); Write(‘Tiep tuc? c/k’); Readln(Tieptuc); End; Readln; End (4)