5. ổn định tổ chức :2. Kiểm tra bài cũ: 2. Kiểm tra bài cũ:
(kiểm tra xen trong bài thực hành) 3. Bài mới:
Hoạt động của thầy và trị Nội dung ghi bảng Hoạt động 1: Làm đẹp màn hình kết quả bằng lệnh gotoxy, where
- Giáo viên cho chạy kết quả của bài thực hành Bang_cuu_chuong
Yêu cầu học sinh 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 mở chơng trình Bang_cuu_chơng và sửa lại chơng trình theo bài trên màn hình của giáo viên.
- HS: gõ 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 cha dùng lệnh gotoxy(5, wherey)
- HS: quan sát và nhận xét.
Bài 2 sgk (T63)
a) Giới thiệu lệnh gotoxy(), wherex - 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.
* Lu ý: 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
- GV: giới thiệu cấu trúc lệnh for lồng, 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: đa nội dung chơng trình bài
Bài 3 SGK (T64).
a) Câu lệnh for lồng trong for
- For<biến đếm1:= giá trị đầu> to <giátrịcuối> do cuối> do
thực hành 3 lên màn hình, yêu cầu học sinh đọc chơng trình, tìm hiểu hoạt động của chơng trình. - HS: hoạt động theo nhĩm, tìm
hiểu hoạt động của chơng trinh, đại diện của nhĩm báo cáo kết quả thảo luận.
- GV: cho chạy chơng trình. - HS : quan sát kết quả trên màn
hình.
trị cuố>do
< câu lệnh>;
Program Tao_bang; Uses crt;
Var i,j: byte; Begin Clrscr; For i:=1 to 9 do Begin For j:=0 to 9 do Writeln(10*i+j:4); Writeln; End; Readln; End. Hoạt động 3: kết thúc - HS: tắt chơng trình ứng dụng, tắt máy, tắt nguồn. Hoạt động 4: Củng cố và HD học ở nhà
-Nhận xét rút kinh nghiệm giờ thực hành.
- Y/c học sinh về nhà sử dụng lệnh gotoxy để chỉnh sửa lại bài thực hành số 3 cho kết quả in ra màn hình đẹp.
Ngày soạn : 20/1/2011
Tiết: 41
BÀI TẬPI. Mục tiờu: I. Mục tiờu: