Vì vậy ta cần sử dụng thêm một vòng lặp nữa để các cột được xuất ra màn hình như bảng trên - Chỉ số hàng sẽ nằm trong khoảng nào?. - Chỉ số cột sẽ viết như thế nào??[r]
(1)Tuần: 21 19/01/2013 Tiết: 41 23/01/2013 Ngày soạn Ngày dạy: Bài thực hành số Sử dụng lệnh lặp For … (T1) I MỤC TIÊU Kiến thức - Viết chương trình có sử dụng vòng lặp for … - Sử dụng câu lênh Kĩ - Rèn kỹ đọc hiểu chương trình có sử dụng vòng lặp for … Thái độ - Nghiêm túc học tập, ý thức tự tìm tòi và nghiên cứu bài, ham thích môn học II CHUẨN BỊ Giáo viên - Giáo án, sách giáo khoa, phấn, bảng, máy tính, máy chiếu Học sinh - Sách giáo khoa, ghi, bút thước… III NỘI DUNG VÀ TIẾN TRÌNH BÀI DẠY Ổn định tổ chức lớp Sĩ số các lớp: Sĩ số các lớp: Lớp 8A1: ……………… ; 8A2: ……………….; 8A3: …………… … 8A4: ……………… ; 8A5: ……………….; 8A6: …………… … Kiểm tra bài cũ Cho đoạn chương trình : for i:= to Begin Write(‘Nhap ten cua ban : ‘); Readln(Ten); Writeln(‘Chao ban : ‘,Ten); End; Sau thực chương trình trên, ta thấy kết nào ? Bài Hoạt động thầy - GV giới thiệu bài tập (trên máy chiếu) Cho học sinh thực hành gõ chương trình bài (SGK/62) - GV quan sát tiến trình thực hành học sinh - Các em hãy tìm hiểu ý nghĩa các câu lênh chương Hoạt động trò - HS thực hành theo nhóm (2HS) Kiến thức ghi bảng Bài : Viết chương trình in màn hình bảng nhân các số từ đến 9, số nhập từ bàn phím và dừng màn hình để có thể quan sát kết quả: - HS tìm hiểu và đại diện a Gõ chương trình sau : số nhóm trả lời uses crt; - HS chú ý var N,i:integer; (2) trình - GV nhấn mạnh câu lệnh for … - GV chú ý cho HS : Trong vòng lặp for … có nhiều câu lệnh thì phải đặt Begin … end; - Cho HS dịch chương trình và sửa lỗi - Cho HS tiếp tục làm câu c, và quan sát kết nhận trên màn hinh, nhận xét - Hãy cho biết số lần lặp vòng lặp for … ứng với giá trị 1, 2, 3,…, 10 ? - Chú ý : Nếu chương trình lặp lại nhiều lần, ta muốn ngắt chương trình thì sử dụng tổ hợp phím Ctrl + Break - Trong hình 36, khác kết nhận chổ nào? - GV giới thiệu cho HS các lệnh GotoXY, WhereX và WhereY (Máy chiếu) - Cho học sinh thực bổ sung các câu lênh - HS thực theo yêu câu - HS trả lời Quan sát - Chú ý lắng nghe - HS trả lời - HS chú ý phần lưu ý sách giáo khoa, quan sát và theo dõi - HS thực hành theo yêu cầu begin clrscr; write('Nhap so N='); readln(N); writeln; writeln('Bang nhan ',N); writeln; for i:=1 to 10 writeln(N,' x ',i:2,' = ',N*i:3); readln end b Tìm hiểu ý nghĩa các câu lệnh chương trình, dịch chương trình và sửa lỗi, có c Chạy chương trình với các giá trị nhập vào 1, 2, , 10 Quan sát kết nhận trên màn hình Bài 2: Chỉnh sửa chương trình trên màn hình để làm đẹp thêm màn hình * Lưu ý: - Chỉ sử dụng các lệnh GotoXY, WhereX và WhereY sau khai báo thư viện crt Pascal - Câu lệnh GotoXY(a, b) có tác dụng đưa trỏ cột a, hàng b - WhereX cho biết số thứ tự cột và WhereY cho biết số thứ tự hàng có trỏ Ví dụ GotoXY(5,WhereY) đưa trỏ vị trí cột hàng Củng cố - Số lần lặp chương trình for có biết trước không? - Câu lệnh GotoXY(a,b) có tác dụng nào ? - Chú ý có thể kết hợp câu lệnh GotoXY(a,b)với các hàm chuẩn WhereX và WhereY để điều khiển vị trí trỏ trên màn hình.5 Dặn dò - Xem kỹ lại các bài, chú ý các số lần lặp chương trình for … - Tìm hiểu tiếp bài tập (SGK/67) IV RÚT KINH NGHIỆM (3) Tuần: 21 19/01/2013 Tiết: 42 23/01/2013 Ngày soạn Ngày dạy: Bài thực hành số Sử dụng lệnh lặp For … (T2) I MỤC TIÊU Kiến thức Viết chương trình có sư dụng vòng lặp For…do lồng nhau; Kĩ - Rèn kỹ đọc hiểu chương trình có sử dụng vòng lặp for … Thái độ - Nghiêm túc học tập, ý thức tự tìm tòi và nghiên cứu bài, ham thích môn học II CHUẨN BỊ Giáo viên - Giáo án, sách giáo khoa, phấn, bảng, máy tính, máy chiếu Học sinh - Sách giáo khoa, ghi, bút thước… III NỘI DUNG VÀ TIẾN TRÌNH BÀI DẠY Ổn định tổ chức lớp Sĩ số các lớp: Sĩ số các lớp: Lớp 8A1: ……………… ; 8A2: ……………….; 8A3: …………… … 8A4: ……………… ; 8A5: ……………….; 8A6: …………… … Kiểm tra bài cũ Nhắc lại tác dụng câu lệnh lặp với số lần biết trước? Bài Hoạt động thầy Đưa chương trình sau: Program Tao_bang; Uses Crt; Var i: byte; {chi so cua hang} j: byte; {chi so cua cot} Begin Clrscr;{xoa man hinh} For i:=0 to {viet Hoạt động trò Đọc kĩ chương trình ghi cụ thể vào Kiến thức ghi bảng Program Tao_bang; Uses Crt; Var i: byte; {chi so cua hang} j: byte; {chi so cua cot} Begin Clrscr;{xoa man hinh} For i:=0 to (4) theo tung hang} begin For j:=0 to {viet theo tung cot tren moi hang} write(10*i+j:4); {viet cac so ij man hinh} writeln; {xuong hang moi} end; {xong hang thu i} readln {dung chuong trinh de xem ket qua} end GV:Hãy quan sát bảng ban đầu và cho biết cần khai báo biến nào? GV: Kiểu liệu tương ứng biến là gì? Ta có thể sử dụng kiểu integer không? GV: Vì yêu cầu bảng là xuất từ đến 99 cho nên ta cần khai báo kiểu byte GV: Cho HS tìm hiểu kĩ phần thân chương trình: Quan sát bảng em thấy các số xếp nào? Nếu sử dụng vòng lặp For… thì các số có xuất bảng trên không? Vì ta cần sử dụng thêm vòng lặp để các cột xuất màn hình bảng trên - Chỉ số hàng nằm khoảng nào? - Chỉ số cột viết nào? {viet theo tung hang} begin For j:=0 to {viet theo tung cot tren moi hang} write(10*i+j:4); {viet cac so ij man hinh} writeln; {xuong hang moi} end; {xong hang HS: Cần có số hàng, số cột thu i} HS: Kiểu byte HS: Có thể sử dụng kiểu integer readln {dung chuong trinh de xem ket qua} end HS: Các số xếp theo hàng và theo cột HS: Chỉ xuất hàng từ - HS: Chỉ số hàng nằm khoảng từ – HS: Viết theo cột trên hàng HS: Viết các số màn hình HS gõ đúng chương trình GV: Công việc sau sử dụng hai vòng lặp là gì? HS chạy thử chương trình GV: Yêu cầu HS gõ đúng chương trình GV: Yêu cầu HS chạy thử chương trình Củng cố Giống các câu lệnh rẽ nhánh If…then, các câu lệnh For …do có thể lồng Do đó các biến đếm các câu lệnh lặp phải khác Lưu ý các câu lệnh để điều chỉnh kết màn hình Dặn dò - Xem kĩ ví dụ SGK và lưu ý các phần chú thích - Nắm thật vững tác dụng câu lệnh lặp với số lần biết trước - Cho bài toán sau: “Tìm số n nhỏ cho 1/n bé 8, 43” Hoàn thành bài toán vào (5) IV RÚT KINH NGHIỆM (6)