Tuần 22 - Tiết 42
Ngày dạy: 14/01/2015

Bài thực hành 5:
SỬ DỤNG LỆNH LẶP FOR … DO


1. MỤC TIÊU:
Kiến thức:
* Hoạt động 1: - Học sinh biết thêm các câu lệnh GotoXY(a,b); WhereX và WhereY.
- Học sinh hiểu từng câu lệnh trong chương trình; hiểu hơn quá trình hoạt động của câu lệnh lặp For … do trong chương trình.
* Hoạt động 2: - Học sinh biết trong một chương trình có thể dung các câu lệnh For lòng nhau.
- Học sinh biết viết chương trình Pascal có câu lệnh lặp For …do lòng nhau.
- Học sinh hiểu từng câu lệnh trong chương trình; hiểu hơn quá trình hoạt động của câu lệnh lặp For … do trong chương trình.
Kĩ năng:
Hs thực hiện được:
- Học sinh thực hiện được các thao tác với phần mềm Pascal để thực hiện viết chương trình, dịch, chạy và lưu chương trình; viết chương trình Pascal có câu lệnh lặp For …do.
Hs thực hiện thành thạo:
- Học sinh thực hiện thành thạo các thao tác với phần mềm Pascal để thực hiện viết chương trình, dịch, chạy và lưu chương trình; viết chương trình Pascal có câu lệnh lặp For …do.
Thái độ:
Thói quen:
- Học sinh thói quen tự rèn luyện trong của môn học có ý thức học tập bộ môn, ham thích tìm hiểu về tư duy khoa học.
Tính cách:
- Rèn luyện tính kiên trì trong học tập, rèn luyện.
2. NỘI DUNG BÀI HỌC:
- Tiếp tục thực hành sử dụng lệnh lặp For ... do.
3. CHUẨN BỊ:
3.1. Giáo viên: Phòng máy. Phần mềm Pascal hoạt động tốt.
3.2. Học sinh: Học bài cũ, xem trước bài mới.
4. TỔ CHỨC CÁC HOẠT ĐỘNG HỌC TẬP:
Ổn định tổ chức và kiểm diện. (2 phút)
Giáo viên ổn định tổ chức và kiểm diện học sinh.
Kiểm tra miệng:
Lòng trong quá trình thực hành.
Tiến trình bài học:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG BÀI HỌC

 Hoạt động 1: Làm đẹp màn hình kết quả bằng lệnh gotoxy, where. (15 phút)
Gv: Yêu cầu học sinh mở chương trình Bang_cuu_chương đã lưu trong tiết trước. Quan sát kết quả và nhận xét khoảng cách giữa các hàng, cột.
Hs: Quan sát và đưa ra nhận xét.
? Có cách nào để khoảng cách giữa các hàng và các cột tăng lớn?
Gv: Giới thiệu câu lệnh gotoxy và where.
Gv: Yêu cầu học sinh sửa lại chương trình theo hướng dẫn của giáo viên.
Hs: Viết chương trình vào máy, sửa lỗi chính tả, chạy chương trình, quan sát kết quả.
Gv: Yêu cầu học sinh quan sát kết quả và so sánh với kết quả của chương trinh khi chưa dùng lệnh gotoxy(5, wherey)
Hs: Quan sát và nhận xét.

Bài 2: sgk (T63)
+ Giới thiệu lệnh wherex; wherey và Gotoxy(a,b)
Trong đó: a là chỉ số cột, b là chỉ số hàng
- Ý nghĩa của câu lệnh là đưa con trỏ về cột a hàng b.
- Wherex: cho biết số thứ tự của cột, wherey cho biết số thứ tự của hàng.
* Lưu ý: Phải khai báo thư viện crt trước khi sử dụng hai lệnh trên.
a) Chỉnh sửa chương trình như sau:
Program Bang_cuu_chuong;
Uses crt;
Var i, n: integer;
Begin
Clrscr;
Writeln(‘Nhap vao so n’); readln(n);
Writeln(‘Bang nha’,n);
Writeln;
For i:=1 to 10 do
begin
gotoxy(5, wherey);
Writeln(n,’x’,i:2,’=’,n*i:3);
Readln;
End.

Hoạt động 2: Sử dụng lệnh For lồng trong for (20 phút)
Gv: Giới thiệu cấu trúc lệnh for lồng nhau, hướng dẫn học sinh cách sử dụng lệnh.
Hs: Ghi chép cấu trúc và lĩnh hội
Gv: Yêu cầu học sinh học sinh đọc chương trình, tìm hiểu hoạt động của chương trình và viết chương trình
Hs: Hoạt động theo nhóm, tìm hiểu hoạt động của chương trình, đại diện của nhóm báo cáo kết quả thảo luận.
Gv: Yêu cầu hs chạy chương trình.
Hs: Cho chạy chương trình và quan sát kết quả.
Gv: Hướng dẫn học sinh làm câu b.
Hs: Thực hiện câu b theo hướng dẫn của giáo viên.
Bài 3 Sgk (T64).
a) Câu lệnh for