Giáo án Tin học 8 tiết 42: Bài thực hành 5: sử dụng lệnh lặp for ...do

Ngày soạn:10/01/2010
Ngày dạy:15/01/2010
 Tiết: 42: 
Bài thực hành 5: Sử dụng lệnh lặp for ...do
I. Mục tiêu: 	
1. Kiến thức Vận dụng kiến thức của vòng lặp for... do, câu lệnh ghép để viết chương trình.
2. Kỹ năng. 
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.
3. Thái độ: Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.
III. chuẩn bị của GV, HS 
1. Chuẩn bị của GV: - Giáo án, SGK, phòng máy, phần mềm pascal
2. Chuẩn bị của HS: - SGK, vở ghi, bút,nghiên cứu trước bài
IV. Tiến Trình lên lớp:
Hoạt động của giáo viên
HĐ của HS
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.
? 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.
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à đa ra nhận xét.
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ả.
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.
* 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 
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.
GV: đưa nội dung chương trình bài 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.
GV: cho chạy chương trình.
HS: ghi chép cấu trúc và lĩnh hội
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.
HS : quan sát kết quả trên màn hình.
Bài 3 SGK (T64).
a) Câu lệnh for lồng trong for
- For to do
 For to do
;
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à dặn dò.
Củng cố Nhận xét rút kinh nghiệm giờ thực hành.
Dặn dò học sinh về nhà 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
IV. Rút kinh nghiệm: