Giáo án Tin học 8 tiết 51, 52: Thực hành sử dụng câu lệnh while…do

 Ngày soạn:01/03/2010
Ngày dạy: 03/03/2010
TiÕt 51 THỰC HÀNH SỬ DỤNG CÂU LỆNH WHILEDO..
I.Mục tiêu:
+ KiÓm tra vËn dông cấu trúc lặp với số lần chưa biết trước trong ngôn ngữ lập trình;
+ Hiểu hoạt động của câu lệnh lặp với số lần chưa biết trước while...do trong Pascal.
II. Chuẩn bị
GV: SGK
HS: Xem trước bài ở nhà
III. Tiến tr×nh bài giảng
Ho¹t ®éng 1: Kiểm tra bài cò
Nªu cÊu tróc lÖnh víi sè lÇn ch­a biÕt tr­íc?
Hoạt động của GV
Ghi bảng
 Hoạt động 2: ¤n tËp lý thuyÕt:
 Nh¾c l¹i cú pháp lệnh
while  do .;
?C¸ch thùc hiÖn c©u lÖn While .... do... nh­ thÕ nµo?
L­u ý tr¸nh lÖnh lÆp v« h¹n lÇn
?H·y ph¸t biÓu sù kh¸c biÖt gi÷a c©u lÖnh lÆp víi sè lÇn lÆp cho tr­íc vµ c©u lÖnh lÆp víi sè lÇn lÆp ch­a biÕt tr­íc? 
 GV nhËn xÐt, ®¸nh gi¸
H§ 3: Bµi tËp
Y/ c häc sinh ®äc bµi tËp 1 SGK
? Nªu c¸c biÕn ®Ó sö dông trong ch­¬ngtr×nh lµ g×? KiÓu cña chóng lµ kiÓu g×?
? Nªu thuËt to¸n ®Ó viÕt ch­¬ng tr×nh trªn nh­ thÕ nµo?
Y/c HS nhËp ch­¬ng tr×nh ch¹y thö vµ s÷a lçi(Nõu cã).
while do ;
trong đó:
- điều kiện thường là một phép so sánh;
- câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép
Bước 1 : Kiểm tra điều kiện.
Bước 2 : Nếu điều kiện SAI, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1
Ph¸t biÓu.
§äc bµi tËp 1 SGK
C¸c biÕn lµ: n, x, dem, tb
KiÓu cña chóng lµ:
N, dem : Interger
X, TB : Real
Nªu thuËt to¸n
1) ¤n tËp lý thuyÕt:
2. Bµi tËp 1 SGK.
* ThuËt to¸n:
B1: Dem <- 0; TB <- 0; 
B2: NÕu dem <n th× dem <- dem + 1; TB <- TB + x .
B3 TB <- TB/n in TB
* ViÕt ch­¬ng tr×nh
IV.Cñng cè: Hệ thống lại bài.
"==================================================
Ngày soạn:02/03/2010
Ngày dạy: 05/03/2010
TiÕt 52: THỰC HÀNH SỬ DỤNG CÂU LỆNH WHILEDO..
I.Mục tiêu::
+ KiÓm tra vËn dông cấu trúc lặp với số lần chưa biết trước trong ngôn ngữ lập trình;
+ Hiểu hoạt động của câu lệnh lặp với số lần chưa biết trước while...do trong Pascal.
II. Chuẩn bị
GV: SGK
HS: Xem trước bài ở nhà
III. Tiến trình bài giảng
1. Ổn định ớp
2. Kiểm tra bài cò
Nªu cÊu tróc lÖnh víi sè lÇn ch­a biÕt tr­íc?
3. Bài mới
Hoạt động của GV
Hoạt động của HS
Ghi bảng
Viết chương trình trên bằng lệnh for... do
? Điều kiện dừng của chương trình là gì?
Hướng dẫn học sinh viết chương trình bằng câu lệnh for ... do
Đọc bài tập 2
Đọc hiểu từng câu lệnh
?CT có mấy câu lệnh ghép và hãy chỉ ra câu lệnh ghép đó?
Viết và vở nháp.
 Biến đếm > n dừng lệnh for ...do
Nhập chương trình chạy thử và sữa lỗi.
Đọc bài tập 2 SGK
Nêu ý nghĩa từng câu lệnh trong CT
01 câu lệnh ghép
1. Bài tập 1d.
Program tinh_TB;
Var i, n: Interger;
 X, TB : Real;
Begin
Write(‘Nhap vao so cac so can tinh n=’); readln(n);
For i:=1 to n do
 Begin
 Write(‘nhap so thu’,I,’=’);
 Readln(x);
 Tb:= TB + x;
 End;
TB:= TB/n;
Writeln(‘Trung binh cua’,n,’so la=’, TB:10:3);
Readln;
End.
2. Bài tập2
* Đọc hiểu câu lệnh.
* Gõ CT và chạy thử.
IV. Cñng cè:HÖ thèng l¹i bµi nh¾c nhë häc sinh tÝnh cÈn thËn khi viÕt ch­¬ng tr×nh