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

Tiết 49	BÀI THỰC HÀNH 5:
 SỬ DỤNG LỆNH LẶP FOR .. DO
Ngày soạn: 13/03/09
Ngày giảng: 16/03/09
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.
II/ CHUẨN BỊ: 
- Sách giáo khoa, giáo án, tài liệu tin học có liên quan. Phòng máy.
- Đọc tài liệu ở nhà trước khi 
III. TIẾN TRÌNH LÊN LỚP:
Tổ chức. 
Kiểm tra. 
Kiểm tra sự chuẩn bị của học sinh .
Bài mới:
Chúng ta đã nghiên cứu lý thuyết về vòng lặp for  do. để biết vòng lặp chạy như thế nào thì hôm nay chúng ta cùng nhau đi vào tiết thực hành. Giáo viên ghi tên bài học lên bảng.
Hoạt Động c ủa GV và HS
Nội Dung
Hoạt động 1: Viết chương trình cho các bài tập đã cho về nhà. (15’)
GV: yêu cầu mỗi dãy gõ một bài vào máy (10’)
- HS: gõ chương trình, chạy thử chương trình, và báo cáo kết quả.
GV: hỗ trợ học sinh trong quá trình thực hành.
Sau khi kết quả chạy chương trình đã đúng, gv yêu cầu học sinh chữa bài của mình đã làm ở nhà cho đúng theo chương trình đã chạy.
 Bài 1: Tính tổng của n số tự nhiên đầu tiên
Program tinh_tong;
Uses crt;
Var i, n: integer; tong: longin;
Begin
Clrscr;
Tong:=0;
Writeln(‘Nhap vao so n’); readln(n);
For i:=1 to n do
Tong: = Tong+i;
Writeln(‘Tong của’, n,’so tu nhien dautien la’,tong); 
Readln;
End.
2. Viết chương trình tìm xem có bao nhiêu số dương trong n số nhập vào từ bàn phím
Program tinh_so_cac_so_duong;
Uses crt;
Var i,A, dem, n: integer; 
Begin
Clrscr;
Dem:=0;
Writeln(‘Nhap vao so n’); readln(n);
For i:=1 to n do 
begin
writeln(‘nhap vao so thu’,i); readln(A);
if A>0 then dem:=dem+1;
end;
Writeln(‘So cac so duong la’,dem); 
Readln;
End.
Hoạt động 2: Bảng cửu chương. 
GV: Đưa ra nội dung của bài toán.
HS: Nghiên cứu bài toán, tìm input và output.
GV: Đưa nội dung chương trình lên màn hình, yêu cầu học sinh đọc hiểu chương trình.
HS: đọc, phân tích câu lệnh tìm hiểu hoạt động của chương trình.
GV: yêu cầu một học sinh đứng tại vị trí trình bày hoạt động của chương trình, các nhóm khác cùng tham gia phân tích.
HS: tham gia hoạt động của giáo viên
GV: yêu cầu học sinh lập bảng hoạt động của chương trình theo mẫu:
Giả sử N=2:
Bước
i
i<=10
Writeln(n,’.’,i,’=’,n*i)
1
1
đúng
2.1=2
HS: các nhóm lập bảng và đại diện nhóm báo cáo kết quả.
GV: nhận xét.
GV: cho chương trình chạy trên máy, yêu cầu học sinh quan sát kết quả.
 Nhận xét, rút kinh nghiệm tiết thực hành
Bài 2: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan sát kết quả.
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
Writeln(n,’x’,i:2,’=’,n*i:3); 
Readln;
End.
Củng cố: 
Giáo viên hệ thống lại toàn bộ nội dung bài học.
Nhận xét, rút kinh nghiệm tiết thực hành
Hướng dẫn về nhà: 
Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và luyện viết, làm đi làm lại nhiều lần.
Học kĩ lí thuyết, viết chương trình tính tông 100 số tự nhiên, N số tự nhiên đầu tiên.
về nhà xem trước bài thực hành 2 SGK (T63) viết chương trình in ra màn hình bảng cửu chương từ 2 đến 9.
Đọc bài mới để giờ sau học.
 Tiết 50	BÀI THỰC HÀNH 5
 SỬ DỤNG LỆNH LẶP FOR .. DO
Ngày soạn: 13/03/09
Ngày giảng: 16/03/09
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, tìm hiểu câu lệnh gotoxy(), where, lệnh for lồng trong for
2. Kỹ năng. 
Viết chương trình có sử dụng vòng lặp for  do;
Sử dụng câu lệnh ghép trong chương trình;
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 thực hành.
II/ CHUẨN BỊ: 
- Sách giáo khoa, giáo án, tài liệu tin học có liên quan. Phòng máy
- Đọc tài liệu ở nhà trước khi 
III. TIẾN TRÌNH LÊN LỚP:
Tổ chức.
Kiểm tra.
Kiểm tra sự chuẩn bị của học sinh .
Bài mới:
HOẠT ĐỘNG CỦA GIÁO VIÊN
HOẠT ĐỘNG CỦA HỌC SINH
Hoạt động 1: Làm đẹp màn hình kết quả bằng lệnh gotoxy, where (20’)
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 chưa 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.
* 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’)
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 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.
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.
Củng cố: 
Giáo viên hệ thống lại toàn bộ nội dung bài học.
Nhận xét rút kinh nghiệm giờ thực hành.
Hướng dẫn về nhà: 
Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và luyện viết, làm đi làm lại nhiều lần.
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.
Đọc bài mới để giờ sau học.
-----------------o0o-----------------