I. MỤC TIÊU
- Viết được chương trình có sử dụng vòng lặp for do
- Sử dụng được câu lệnh ghép
- Rèn luyện kĩ năng đọc hiểu chương trình có sử dụng vòng lặp for do
II. CHUẨN BỊ
1. Giáo viên:
- Phòng máy
- Giáo án, bảng phụ, các bài tập mẫu
- Sách giáo khoa
2. Học sinh:
- Sách giáo khoa
- Vở soạn trước bài thực hành Sử dụng lệnh lặp For do
- Hiểu và biết sử dụng vòng lặp for do
Tiết CT: 41,42 Ngày soạn: 24/01/2010 Tuần: 22 SỬ DỤNG LỆNH LẶP FOR DO I. MỤC TIÊU - Viết được chương trình có sử dụng vòng lặp for do - Sử dụng được câu lệnh ghép - Rèn luyện kĩ năng đọc hiểu chương trình có sử dụng vòng lặp for do II. CHUẨN BỊ Giáo viên: Phòng máy Giáo án, bảng phụ, các bài tập mẫu Sách giáo khoa Học sinh: Sách giáo khoa Vở soạn trước bài thực hành Sử dụng lệnh lặp For do Hiểu và biết sử dụng vòng lặp for do III. TIẾN TRÌNH LÊN LỚP Bước 1: Ổn định lớp: 3 phút Bước 2: kiểm tra bài cũ: 7 phút Em hãy cho vài ví dụ về các hoạt động được thực hiện lặp lại trong cuộc sống hằng ngày? Nêu cú pháp câu lệnh lặp? Cho ví dụ. Bước 3: giảng bài mới Hoạt động của thầy, trò Nội dung ghi bảng Hoạt động 1: bài 1 (20 phút) Gv: Đưa nội dung bài tập 1 yêu cầu học sinh đọc và nêu yêu cầu bài toán Hs: đọc bài Gv:Yêu cầu HS quan sát và tìm hiểu ý nghĩa chương trình (sgk)? Hs: Suy nghĩ trả lời Gv: Gọi HS khá giải thích câu lệnh: For i:=1 to 10 do Writeln(N,’ x ‘, i:2,’ =’, N*i:3); Hs: Suy nghĩ trả lời Gv: Nhấn mạnh sự thay đổi của biến i và các tham số của câu lệnh để viết bảng nhân. Gv: theo em các tham số: 2, :3 có ý nghĩa gì?(.........ý nghĩa quy định cách trình bày). Gv: yêu cầu HS gõ chương trình trên vào máy. Cho dịch, sửa lỗi (nếu có) và chạy chương trình với các giá trị lần lượt bằng 1, 2, , 10. Hs: Hs quan sát kết quả trên màn hình, trả lời kết quả vừa thực hiện Gv: Cho HS xem chương trình như trong Sgk đưa ra để thấy được sự khác nhau trong việc sử dụng câu lệnh điều kiện dạng thiếu và đầy đủ. Tiết 40, 41: SỬ DỤNG LỆNH LẶP FOR DO Bài 1: SỬ DỤNG LỆNH LẶP FOR DO Bài 1: Program Bang_nhan; Uses crt; Var N, i:Integer; Begin Clrscr; Write(‘nhap so N:’); Readln(N); Writeln; Writeln(‘bang nhan’, N); Writeln; For i:=1 to 10 do Writeln(N,’ x ‘, i:2,’ =’, N*i:3); Readln End.
Tài liệu đính kèm: