Giáo án Tin học 8 - Tiết 51-52 - Năm học 2010-2011

Ngày dạy: 	 / / 2010.	Tại lớp 8A1; 	
Ngày dạy: 	 / / 2010.	Tại lớp 8A2;
Tiết 51: Bài thực hành 6 sử dụng lệnh lặp whiledo
I. Mục tiêu bài học: 	
1. Kiến thức: 
	Vận dụng câu lệnh lặp với số lần chưa biết trước While do cho bài tập
	Hiểu được hoạt động vòng lặp với số lần chưa biết trước
2. Kỹ năng: Viết chương trình pascal có sử dụng lệnh While do
	Rèn kỹ năng đọc chương trình, tìm hiểu tác dụng của câu lệnh
3.Thái độ: Thái độ học tập nghiêm túc, tích cực làm các dạng bài tập ứng dụng.
II. Chuẩn bị của giáo viên và hoc sinh
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, phiếu học tập
III. Hoạt động dạy và học
Lớp 8A1: / 	Lớp 8A2: / 	
Hoạt động của GV và HS
Nội dung
1. Kiểm tra bài cũ ( Không)
2. Dạy nội dung bài mới.
Hoạt động 1 ( 3 phút)
Mục đích yêu cầu.
GV: Cho 2 HS đọc mục đích yêu cầu
HS: Đọc mục đích yêu cầu
GV: Kết luận
1. Mục đích yêu cầu.
Viết được chương trình pascal có câu lệnh While ..do
Tiếp tục nâng cao kỹ năng đọc chương trình.
Hoạt động 2 ( 15 phút)
Bài tập 1
GV: Cho 2 HS đọc thông tin bài tập 1.
HS: Đọc thông tin bài tập 1
GV: Hướng dẫn HS thực hiện các yêu cầu của bài thực hành
a)Mô tả thuật toán của chương trình
GV: Đưa ra gợi ý của SGK
? Ta phải khai bao nhiêu biến và kiểu dữ liệu kiểu gì?
HS:Trả lời
GV: Khai báo n là số lượng số thực
 Dem là điếm số thực.
 X là các số thực
 TB là giá trị trung bình
N, dem là kiểu số nguyên
X,TB là kiểu số thực.
? Để tính TB và đếm ta luôn phải thực hiện thao tác gì lúc đầu.
HS: Gán các giá trị bằng 0
GV: Sau đó nhập số lượng số thực cần tính TB.
? Điều kiện gì thì vòng lặp dừng lặp.
HS: Trả lời.
GV: Mỗi lần đếm ta sẽ nhập 1 số thực rồi tính vào TB.
GV và Hs xây dựng vòng lặp While .. do
GV: Khi tính song ta chi việc lấy tổng chia cho n số.
b)Gõ chương trình như SGK Tr72
c)Tìm hiểu ý nghĩa các câu lệnh trong chương trình, dịch chương trình và sửa lỗi nếu có.
d) Viết lại chương trình bằng vòng lặp For ..do
GV: Gợi ý ta xác định gtđ và gtc.
HS: Viết CT thay bằng câu lệnh For ..do
Bài tập 1 SGK Tr72
ý tưởng: Sử dụng một biến đếm và vòng lặp While .. do để tính TB n số thực vào một kiến kiểu số thực cho đến khi nhập đủ n số.
a)Mô tả thuật toán của chương trình
b)Gõ chương trình như SGK Tr72
c)Tìm hiểu ý nghĩa các câu lệnh trong chương trình, dịch chương trình và sửa lỗi nếu có.
d) Viết lại chương trình bằng vòng lặp For ..do
Hoạt động 2 ( 20 phút)
Thực hành
GV: ổn định HS vào vị trí máy.
GV: Tổ chức HS thực hành bài tập 1 trên máy.
HS: Thực hiện trên máy 15 phút
GV: Quan sát hướng dẫn HS thực hiện
Chú ý: Sử dụng thao tác sao chép để làm bài tập 1 sử dụng vòng lặp For ..do
3. Củng cố (3 phút)
GV:Nhận xét giờ thực hành
HS: Rút kinh nghiệm
GV: Lấy một số bài làm mẫu và một số lưu ý khi thực hành.
4. Hướng dẫn học sinh tự học nhà ( 2 phút)
	Học kĩ lí thuyết cấu trúc lệnh lặp While ..do
	Đọc trước bài tập 2. Viết lại chương trình bài tập 1 sử dụng vòng lặp For ..do
Ngày dạy: 	 / / 2010.	Tại lớp 8A1; 	
Ngày dạy: 	 / / 2010.	Tại lớp 8A2;
Tiết 52: Bài thực hành 6 sử dụng lệnh lặp whiledo(Tiếp)
I. Mục tiêu bài học: 	
1. Kiến thức: 
	Vận dụng câu lệnh lặp với số lần chưa biết trước While do vào bài tập
	Hiểu được hoạt động vòng lặp với số lần chưa biết trước
2. Kỹ năng: Viết chương trình pascal có sử dụng lệnh While do
	Rèn kỹ năng đọc chương trình, tìm hiểu tác dụng của câu lệnh
3.Thái độ: Thái độ học tập nghiêm túc, tích cực làm các dạng bài tập ứng dụng.
II. Chuẩn bị của giáo viên và hoc sinh
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, phiếu học tập
III. Hoạt động dạy và học
Lớp 8A1: / 	 	Lớp 8A2: / 	
Hoạt động của thầy và trò
Nội dung ghi bảng
1. Kiểm tra bài cũ (0 phút)
2. Dạy nội dung bài mới.
Hoạt động 1 (12 phút)
GV: Cho HS Đọc bài tập 2
? Số nào được gọi là số nguyên tố. Lấy ví dụ.
HS: Trả lời
GV: Đưa ra chương trình kiểm tra số nguyên tố.
HS: Đọc và tìm hiểu ý nghĩa câu lệnh
GV: Đưa ra câu lệnh: 
If n<=1 then Write (n,’khong phai la so nguyen to’);
? Vì sao n<= 1 không phải là số nguyên tố.
HS: Trả lời
GV: Đưa ra câu lệnh: 
 While (n mod i 0) do i:=i+1;
? Vòng lặp hoạt động như thế nào. Khi nào dừng vòng lặp.
HS: trả lời.
GV: Đưa ra câu lệnh:
If i=n then Write(n,’la so nguyen to)
Else 
Write(n,’khong phai la so nguyen to);
End;
? Cho biết ý nghĩa câu lệnh.
HS: Trả lời.
Bài tập 2
Uses crt;
Var n,i:integer;
Begin
Clrscr;
Write(‘Nhap mot so nguyen:’);Read(n);
If n<=1 then Write (n,’khong phai la so nguyen to’);
Else 
Begin
I:=2;
While (n mod i 0) do i:=i+1;
If i=n then Write(n,’la so nguyen to)
Else 
Write(n,’khong phai la so nguyen to);
End;
Readln
End.
Hoạt động 2 ( 30 phút)
GV: Hướng dẫn kỹ năng thực hành bài tập 2.
GV: Tổ chức HS nhận máy tính 2 em/máy
HS: ổn định tổ chức
GV: Yêu cầu HS thực hành bài tập 2 trên máy.
HS: Thực hành trên máy
GV: Quan sát hướng dẫn
Lấy bài tập mẫu hướng dẫn 
GV: Nhận xét thực hành và cho điểm
3. Củng cố và luyện tập (2 phút)
GV:Tóm tắt kiến thức trọng tâm đã học.
GV: Đưa ra tổng kết bài thực hành SGk tr74.
HS: Chú ý
4. Hướng dẫn học sinh tự học ở nhà (1 phút). 
- Học lại bài về câu lệnh lặp while .. do . Xem lại các ví dụ SGK
- Làm lại bài tập 1,2. Đọc bài đọc thêm 2 SGK tr73.