Giáo án: tin học lớp 8 potx

Trng THCS Lý T Trng Giỏo ỏn tin hc
8
= *=*=*=*đ*=*=*=*=
Ngy Dy: / /
Tun: 20
Tit: 37
TèM HIU THI GIAN VI PHN MM SUN TIMES
I/ MC TIấU:
1) Kin thc :
- HS hiu c cỏc chc nng chớnh ca phn mm, s dng phn mm quan sỏt
thi gian a phng ca cỏc v trớ khỏc nhau trờn trỏi t.
- HS cú th t thao tỏc v th c hin mt s chc nng chớnh ca phn mm nh
phúng to mt khu vc trờn bn , tỡm hiu vựng sỏng - ti trờn bn , thay i
thi gian h thng hin thi quan sỏt s chuyn ng ca vựng sỏng ti.
2) K nng:
- HS cú k nng s dng v khai thỏc thnh tho phn mm hc tp.
3) Thỏi :
- Thụng qua phn mm hc sinh bit vn dng v s dng phn mm trong vic h
tr hc tp v nõng cao kin thc ca mỡnh.
- Thụng qua phn mm HS s hiu bit thờm v thiờn nhiờn, trỏi t, t ú nõng cao
ý thc bo v mụi trng sng.
II/ CHUN B:
- GV: Mỏy tớnh, phn mm.
- HS: Vở ghi.
III/ TIN TRèNH LấN LP.
1)n nh t chc:
- Kim tra s s:
2)Kim tra bỏi c:
- Cõu hi: ?Em hóy k tờn mt vi phn mm m em ó c hc, thụng qua phn
mm em s hiu bit thờm v thiờn nhiờn?
(Hc a lý th gii vi Earth Explorer (lp 7), Quan sỏt trỏi t v cỏc vỡ sao trong

h mt tri (lp 6)).
3)Bi mi:
Hoạt động của thầy và trò Nội dung ghi bảng
* Hot ng 1: Tỡm hiu phn mm
GV- Cỏc v trớ khỏc nhau trờn Trỏi t nm
trờn cỏc mỳi gi khỏc nhau.
GV- Phn mm Sun times s giỳp cỏc em nhỡn
c ton cnh cỏc v trớ, thnh ph, th ụ
ca cỏc nc trờn ton th gii v rt nhiu
thụng tin liờn quan n thi gian.
1. Gii thiu phn mm
- Phn mm Sun times s giỳp cỏc
em nhỡn c ton cnh cỏc v trớ,
thnh ph, th ụ ca cỏc nc
trờn ton th gii v rt nhiu
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
1
Trường THCS Lý Tự Trọng Giáo án tin học
8
+ Học sinh chú ý lắng nghe => ghi nhớ kiến
thức.
* Hoạt động 2: Tìm hiểu cách khởi động phần
mềm.
GV:- ? Em hãy nêu cách khởi động phần mềm.
HS: - Nháy đúp vào biểu tượng để khởi động
phần mềm.
GV:Yêu cầu học sinh khởi động phần mềm trên
máy tính.
+ Học sinh khởi động phần mềm trên máy tính

theo yêu cầu của giáo viên.
+ Hoạt động 3 : Tìm hiểu màn hình chính của
phần mềm.
GV:- Yêu cầu học sinh quan sát và cho biết màn
hình chính của phần mềm gồm những gì?
HS:- Màn hình chính của phần mềm gồm:
+ Các vùng sáng tối khác nhau.Vùng sáng cho
biết vị trí thuộc vùng này hiện thời là ban ngày,
vùng tối là ban đêm.
+ Giữa vùng sáng tối có 1 đường vạch liền, đó là
ranh giới giữa ngày và đêm.
+ Trên bản đồ có những vị trí được đánh dấu đó
chính là các thành phố và thủ đô của các quốc gia.
Hoạt động 4 : Tìm hiểu cách thoát khỏi phần
mềm.
GV:- ? Hãy cho biết cách thoát khỏi phần mềm
Ngoài ra ta có thể nhấn tổ hợp phím Alt + F4 để
thoát khỏi phần mềm.
HS:- Để thoát khỏi phần mềm ta chọn Menu File
=> Exit
thông tin liên quan đến thời gian.
2. Màn hình chính của phần mềm:
a) Khởi động phần mềm:
Để khởi động phần mềm ta nháy đúp
vào biểu tượng ở trên màn
hình nền.
b) Màn hình chính của phần mêm:
c) Thoát khỏi phần mềm:
Để thoát khỏi phần mêm ta thực
hiện:

- Chọn File => Exit
- Nhấn tổ hợp phím Alt + F4
4) Củng cố:
? Hãy nêu cách khởi động và thoát khỏi phần mềm Sun Times
5) Hướng dẫn về nhà:
Về nhà học bài.
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
2
Trường THCS Lý Tự Trọng Giáo án tin học
8
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*®*=*=*=*=
Ngày Dạy: / /
Tuần: 20
Tiết: 38
TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES (tiếp)
I/ MỤC TIÊU:
1) Kiến thức :
- HS hiểu được các chức năng chính của phần mềm, sử dụng phần mềm để quan sát
thời gian địa phương của các vị trí khác nhau trên trái đất.
- HS có thể tự thao tác v thà ực hiện một số chức năng chính của phần mềm như
phóng to một khu vực trên bản đồ, tìm hiều vùng sáng - tối trên bản đồ. . .
2) Kĩ năng:
- HS có kỹ năng sử dụng và khai thác thành thạo phần mềm học tập.
3) Thái độ:
- Thông qua phần mềm học sinh biết vận dụng và sử dụng phần mềm trong việc hỗ
trợ học tập và nâng cao kiến thức của mình.

- Thông qua phần mềm HS sẽ hiểu biết thêm về thiên nhiên, trái đất, từ đó nâng cao
ý thức bảo vệ môi trường sống.
II/ CHUẨN BỊ:
- GV: Máy tính, phần mềm.
- HS: Vë ghi.
III/ TIẾN TRÌNH LÊN LỚP.
1)Ổn định tổ chức:
- Kiểm tra sĩ số:
2)Kiểm tra bái cũ:
- Câu hỏi: ?Em hãy cho biết phần mềm Sun Time dùng để làm gì?
3)Bài mới:
Ho¹t ®éng cña thÇy vµ trß Néi dung ghi b¶ng
+ Hoạt động 1: Tìm hiểu cách sử dụng phần mềm
GV:- Muốn phóng to để quan sát một vùng bản
đồ chi tiết ta nhấn giữ nút phải chuột và kéo thả từ
một đỉnh đến đỉnh đối diện của hình chữ nhật này.
+ Học sinh chú ý lắng nghe => ghi nhớ kiến thức.
GV: - Yêu cầu HS nghiên cứu cách để quan sát và
nhận biết ngày và đêm.
HS:- Trên bản đồ có các vùng sáng, tối khác nhau
cho biết thời gian hiện tại của các vùng này là
ngày hay đêm.
GV:- Cho hs quan sát và xem thông tin thời gian
chi tiết của một địa điểm cụ thể.
3. Hướng dẫn sử dụng:
a) Phóng to và quan sát một vùng bản
đồ chi tiết:
b) Quan sát và nhận biết thời gian:
ngày và đêm.
c) Quan sát và xem thông tin thời gian

chi tiết của một thời điểm cụ thể:
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
3
Trường THCS Lý Tự Trọng Giáo án tin học
8
- Học sinh chú ý quan sát theo sự hướng dẫn của
giáo viên.
GV:- Cho hs quan sát vùng đệm giữa ngày và
đêm.
HS:- Vùng có màu đen trên bản đồ có thời gian
ban đêm. Xung quanh vùng này có một giải phân
cách sáng-tối, đó chính là vùng đệm giữa ngày và
đêm.
+ Hoạt động 2: Tìm hiểu một số chức năng khác
của phần mềm.
GV:- Để hiện và không hiện hình ảnh bầu trời
theo thời gian ta thực hiện như sau: Option =>
Maps và chọn hoặc hủy chọn tại mục Show Sky
Color.
+ Học sinh chú ý lắng nghe => ghi nhớ kiến thức
GV:- ?Để cố định vị trí và thời gian quan sát ta
làm như thế nào?
HS:- Để chuyển cách thức thay đổi thông tin này
ta chọn Option => Maps => chọn học hủy chọn
mục Hover Update.
GV:- Yêu cầu HS quan sát cho biết cách tìm các
địa điểm có thông tin thời gian trong ngày giống
nhau
+ Các bước thực hiện:

- Chọn vị trí ban đầu.
- Chọn Option => Anchor time to => chọn mục
Sunrise để tìm theo thời gian.
GV:- Tìm kiếm và quan sát nhật thực trên trái đất
ta thực hiện:
* Chọn địa điểm muốn tìm nhật thực.
* Thực hiện lệnh View => Eclipse.
+ Học sinh chú ý quan sát cách thực hiện.
d) Quan sát vùng đệm giữa ngày và
đêm.
4. Một số chức năng khác
a) Hiện và không hiện hình ảnh bầu
trời theo thời gian.
b) Cố định vị trí và thời gian quan sát:
c) Tìm kiếm địa điểm có thông tin
thời gian trong ngày giống nhau:
d) Tìm kiềm và quan sát nhật thực
trên trái đất
4) Củng cố:
? Hãy nêu cách sử dụng phần mềm Sun Times
5) Hướng dẫn về nhà:
Về nhà học bài.
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
4
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

= *=*=*=*đ*=*=*=*=
Ngy Dy: / /
Tun: 21
Tit: 39
Bài 7: Câu lệnh lặp
I/ MC TIấU:
1) Kin thc :
- Biết nhu cầu cần có câu lệnh lặp trong ngôn ngữ lập trình.
- Biết ngôn ngữ lập trình dùng cấu trúc lặp để chỉ dẫn máy tính thực hiện lặp đi lặp
lại công việc nào đó một số lần.
- Hiểu hoạt động của câu lệnh lặp với số lần biết trớc for .do trong pascal.
2) K nng:
- Viết đúng đợc lệnh for do trong một số tình huống đơn giản.
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/ CHUN B:
- GV: - Giáo án, SGK, phòng máy, phần mềm pascal.
- HS: Vở ghi, phiếu học tập.
III/ TIN TRèNH LấN LP.
1)n nh t chc:
- Kim tra s s:
2)Kim tra bỏi c:
- Khụng kim tra.
3)Bi mi:
Hoạt động của GV và HS Nội dung
Hoạt động 1 :Các công việc phải thực
hiền nhiều lần ( 8 phút)
Các công việc phải thực hiền nhiều lần
GV: Trong cuộc sống hằng ngày nhiều mỗi
ngời đều có các công việc riêng khác nhau.

? Em hãy lấy ví dụ về một số việc hàng
ngày của em.
HS: Một em lấy một số ví dụ.
GV: Ghi ví dụ của học sinh lên bảng
HS: Một em khác lấy thêm một số ví dụ
? Qua những ví dụ các bạn vừa lấy ra trên
bảng thì những công việc nào chúng ta đã
biết trớc số lần lặp đi lặp lại và công việc
1. Các công việc phải thực hiền
nhiều lần
Để chỉ dẫn cho máy tính thực hiện
đúng công việc, trong nhiều trờng hợp
khi viết một chơng trình máy tính
chúng ta cũng phải viết lặp lại nhiều
câu lệnh thực hiện một phép tính nhất
định.
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
5
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
nào chúng ta cha biết số lần lặp lại của nó?
HS: Tách ví dụ thành hai loại (một loại đã
biết trớc số lần lặp và một loại cha biêt số
lần lặp )
GV: Nhận xét và kết luận
Hoạt động 2 :Câu lện lặp - một lệnh thay
cho nhiều lệnh ( 20 phút)
Câu lệnh lặp - một lệnh thay cho nhiều
lệnh

HS: nghiên cứu ví dụ 1.
GV: Phân tích, hớng dẫn viết thuật toán ví
dụ 1.
? Để vẽ đợc nh hình 33 ta phải làm thao tác
nào.
HS: Trả lời.
? Để vẽ hình thứ 2 ta làm nh thế nào?
HS: Trả lời
GV: Tơng tự hình thứ 3 ta vẽ tơng tự.
? Em hãy viết thuật toán mô tả vẽ hình 33.
HS: Hoạt động độc lập 3 phút.
Trả lời
Nhận xét và bổ sung
GV: Kết luận và đa ra thuật toán
HS: Ghi bài.
GV: Để vẽ một hình vuông ta làm thế nào?
HS: Trả lời
GV: Mô tả bằng hình vẽ trên máy.
Đa ra thuật toán vẽ hình vuông.
HS: Chú ý ghi bài.
GV: Cho HS nghiên cứu ví dụ 2.
? Ví dụ 2 công việc gì đợc thực hiện nhiều
lần.
HS: Trả lời
? Qua hai ví dụ trên, các em hãy chỉ ra
những công việc đợc lặp đi lặp lại?
HS: Chỉ ra công việc lặp lại ở vd1 và vd2
GV: Kết luận.
2. Câu lện lặp - một lệnh thay cho
nhiều lệnh

VD1: SGK Tr56
Thuật toán
VD2: Tính tổng của 100 số tự nhiên
đầu tiên.
Thuật toán: (đã nghiên cứu ở bài học
số 5)
- Cánh mô tả các hoạt động lặp trong
thuật toán nh trong 2 ví dụ trên đợc
gọi là cấu trúc lặp.
- Mọi ngôn ngữ lập trình đều có
cách để chỉ thị cho máy tính thực
hiện cấu trúc lặp với một câu lệnh. Đó
là câu lệnh lặp.
Hoạt động 3 :Ví dụ về câu lệnh lặp( 8
phút)
Ví dụ về câu lệnh lặp
3. Ví dụ về câu lệnh lặp
- Trong pascal câu lệnh lặp có dạng:
+Câu lệnh lặp dạng tiến:
For <biến đếm>:= <giá trị đầu> to
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
6
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
GV: Trình bày cấu trúc vòng lặp For
to do

HS: Ghi cấu trúc vòng lặp vào vở.
GV: Giải thích từng thành phần trong cấu

trúc lệnh.
HS: Chú ý, ghi bài
<giá trị cuối> do <câu lệnh>;
Trong đó: for, to, do là các từ khoá,
Biến đếm là biến đơn có kiểu nguyên
(có thể là kiểu kí tự hoặc kiểu đoạn
con)
Giá trị đầu, giá trị cuối là số cụ thể
hoặc là biểu thức có kiểu cùng kiểu
với biến đếm, giá trị cuối phải lớn hơn
giá trị đầu.
Câu lệnh có thể là câu lệnh đơn hoặc
câu lệnh kép.
- Câu lệnh sẽ đợc thực hiện nhiều lần,
mỗi lần thực hiện câu lệnh là một lần
lặp và sau mỗi lần lặp biến đếm sẽ tự
động tăng lên 1 đơn vị, tăng cho đến
khi giá trị của biến đếm lớn hơn giá
trị cuối thì vòng lặp đợc dừng lại.
Bài 4 SGK (Tr61)
Giá trị của j sau mỗi lần lặp sẽ đợc
tăng thêm 2 đơn vị
2, 4, 6, 8, 10, 12.
4) Cng c:(7 phút)
GV: Đa ra bài tập 4
HS đa ra phán đoán kết quả.
? Dựa vào hoạt động vòng lặp em lãy liệt kê cụ thể từng bớc và cho kết quả sau từng
bớc.
HS: Hoạt động theo nhóm bàn trong 5 phút và trả lời.
Nhận xét, bổ sung

GV: Kết luận
5) Hng dn v nh:(1 phút)
- Viết chơng trình tính tổng 100 số tự nhiên, N số tự nhiên đầu tiên.
IV. RT KINH NGHIM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*đ*=*=*=*=
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
7
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
Ngy Dy: / /
Tun: 21
Tit: 40
Bài 7: Câu lệnh lặp (tiếp)
I/ MC TIấU:
1) Kin thc :
- Hiểu hoạt động của câu lệnh lặp với số lần biết trớc for .do trong pascal.
- Hiểu cấu trúc câu lệnh ghép.
2) K nng:
- Viết đúng đợc lệnh for do trong một số tình huống đơn giản.
- Biết kết hợp câu lệnh ghép và câu lệnh lặp for do vào giải quyết một số bài
toán.
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/ CHUN B:
- GV: - Giáo án, SGK, phòng máy, phần mềm pascal.
- HS: Vở ghi, phiếu học tập.

III/ TIN TRèNH LấN LP.
1)n nh t chc:
- Kim tra s s:
2)Kim tra bỏi c:
- Cõu hi: ? Em hãy viết câu lệnh For to do
? Nêu hoạt động của vòng lặp?
HS:- Cấu trúc của câu lệnh lặp:
For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
- Câu lệnh sẽ đợc thực hiện nhiều lần, mỗi lần thực hiện câu lệnh là một lần lặp và
sau mỗi lần lặp biến đếm sẽ tự động tăng đi 1 đơn vị, tăng cho đến khi giá trị của
biến đếm lớn hơn giá trị cuối thì vòng lặp đợc dừng lại.
Số lần lặp = giá trị cuối-giá trị đầu+1
=> for do là cấu trúc lặp với số lần lặp biết tr ớc.
3)Bi mi:
Hoạt động của thầy và trò Nội dung ghi bảng
Hoạt động 1: Ví dụ về câu lệnh lặp
GV: Cho HS nghiên cứu ví dụ 3
GV: Minh họa chơng trình của ví dụ 3
HS: Quan sát ghi bài
3. Ví dụ về câu lệnh lặp (tiếp)
Ví dụ 3 (SGK Tr58) in ra màn
hình thứ tự lần lặp.
Program lap;
Var i: integer;
Begin
For i:=1 to 10 do
Writeln(day la lan lap thu, i);
Readln;
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011

8
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
GV: Cho HS nghiên cứu ví dụ 4
? Để in ra chữ O ta sử dụng lệnh nào.
HS: Trả lời
Để in ra 20 chữ O ta cần 20 câu lệnh
writeln(O; Viết thế rất mất thời gian.
? Em hãy sử dụng câu lệnh lặp để viết in ra 20
chữ O.
HS: Hoạt động theo bàn 2 phút rồi trả lời câu
hỏi.
GV: Nhận xét, kết luận
Đa ra chơng trình minh họa.
HS: Chú ý quan sát.
End.
- VD4 (SGKTr58) Viết chơng
trình đa ra màn hình những chữ
0 theo hình trứng rơi.
Program trung_roi;
Uses crt;
Var i: integer;
Begin
Clrscr;
For i:=1 to 10 do
begin
Writeln(0); delay(100);
end;
Readln;
End.

- Tập hợp các câu lệnh con đợc
đặt trong cặp từ khoá begin
end; đợc gọi là câu lệnh ghép.
Hoạt động 2:Tính tổng và tích bằng câu
lệnh lặp.
GV: Đa ví dụ 5 trên màn hình.
Yêu cầu HS xem lại thuật toán tính tổng vở
VD 3 bài 5 Tr41
HS: 1 em lên bảng mô tả lại thuật toán tính
tổng ở VD5.
HS: Nhận xét, bổ sung
GV và HS cùng xây dựng viết chơng trình dựa
vào thuật toán.
Lu ý: kiểu số Longint
GV: Đa ra ví dụ 6. Hớng dẫn ví dụ6
Tổ chức Hs hoạt động cá nhân trong 3 phút.
Sau đó hoạt động theo nhóm nhỏ làm ví dụ 6.
HS: Hoạt động cá nhân sau đó hoạt động nhóm
thống nhất kết quả
Nhận xét, bổ sung.
GV: Kết luận đa ra bài viết chơng trình.
HS: Quan sát kết quả và ghi bài.
4. Tính tổng và tích bằng câu
lệnh lặp
Ví dụ 5. Tính tổng của N số tự
nhiên đầu tiên.
Ví dụ 6. Tính day tha của N số tự
nhiên đầu tiên.
4) Cng c:
Tóm tắt kiến thức trọng tâm đã học.

HS đọc ghi nhớ.
5) Hng dn v nh:
- Học lại bài về câu lệnh lặp For to do. Xem lại các ví dụ SGK
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
9
Trng THCS Lý T Trng Giỏo ỏn tin hc
8
Về nhà làm bài tập : Tính tổng các số chẵn của dãy số N và tính tổng các số lẻ.
Gợi ý: Kiểm tra số đó là chẵn thì điều kiện IF N mod 2 =0 then S:=S+i;
IV. RT KINH NGHIM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*đ*=*=*=*=
Ngy Dy: / /
Tun: 22
Tit: 41
BI TP
I/ MC TIấU:
1) Kin thc :
- Cng c kin thc vũng lp vi s ln bit trc v cõu lnh ghộp.
2) K nng:
- Vn dng vũng lp for .to.do v cõu lnh ghộp vit mt s bi toỏn n
gin.
3) Thỏi :
- Thỏi hc tp nghiờm tỳc, tớch cc lm cỏc dng bi tp ng dng.
II/ CHUN B:
- GV: - Sỏch giỏo khoa, giỏo ỏn, ti liu tin hc cú liờn quan.
- c ti liu nh trc khi
- HS: Vở ghi.

III/ TIN TRèNH LấN LP.
1)n nh t chc:
- Kim tra s s:
2)Kim tra bỏi c:
- Cõu hi: ? S dng vũng lp for do vit chng trỡnh tớnh tng ca 10 s t
nhiờn u tiờn?
3)Bi mi:
Hoạt động của thầy và trò Nội dung ghi bảng
Hot ng 1: Bi tp dng lớ thuyt.
GV: a ra bi toỏn, yờu cu hc sinh
nghiờn cu theo nhúm.
-HS: Hot ng theo nhúm tỡm cõu tr li.
- HS: i din ca hai nhúm trỡnh by kt qu
ca nhúm.
-GV: Nhn xột kt qu cui cựng.
- GV: a bi tp 2 lờn bng, yờu cu mt hc
sinh ng ti ch tr li.
- HS: Mt hc sinh ng ti ch tr li bi tp
Bi 1: SGK (T60)
Bi 2: SGK (T60)
- Cõu lnh lp cú tỏc dng ch dn
cho mỏy tớnh thc hin lp li mt
cõu lnh hay mt nhúm cõu lnh
vi mt s ln nht nh.
Giỏo viờn: Bựi Cnh Dng Nm hc 2010 -
2011
10
Trường THCS Lý Tự Trọng Giáo án tin học
8
2. một học sinh khác đứng tại chỗ nhận xét.

- GV: Kết luận kết quả của bài 2.
-GV: GV: Đưa ra đề bài toán, yêu cầu học sinh
nghiên cứu theo nhóm.
-HS: Hoạt động theo nhóm tìm câu trả lời.
- HS: Đại diện của hai nhóm trình bày kết quả
của nhóm.
- GV: Nhận xét.
- Câu lệnh lặp làm giảm nhẹ công
sức của người viết chương trình.
Bài 3 SGK (T60)
- Điều kiện cần kiểm tra trong câu
lệnh lặp for … do là giá trị của
biến đếm phải nằm trong đoạn
[giá trị đầu, giá trị cuối ], nếu thoả
mãn điều kiện đó thì câu lệnh sẽ
được thực hiện, nếu không thoả
mãn câu lệnh sẽ bị bỏ qua.
Hoạt động 2: Bài tập dạng thực hành
GV: Đưa ra đề bài toán và yêu cầu một học
sình đứng tại vị trí để trả lời bài tập.
-HS: 1em đứng tại vị trí trả lời, 1 em khác
nhận xét.
- GV: Nhận xét kết quả câu trả lời của 2 bạn.
- GV: Đưa bài tập
- HS: Suy luận kết quả theo lí thuyết
- GV: Ghi kết quả suy luận của học sinh
lên bảng
- HS: gõ chương trình vào máy và chạy
thử
- HS: So sánh kết quả nhận được với kết

quả đã suy lận
- 1 HS giải thích kết quả thu được
- GV Đưa ra bài tập 6.
- HS: Làm việc theo nhóm, sau 5 phút đại
diện của 2 nhóm sẽ lên báo báo kết quả.
- Các nhóm khác nhận xét
GV: Giúp các em hoàn thành thuật toán.
Bài 5 SGK (T61)
Tất cả các câu lệnh đều không
hợp lệ vì:
a) giá trị đầu lớn hơn giá trị cuối
b) giá trị đầu và giá trị cuối có
kiểu là số thực không cùng kiểu
với biến đếm
c) sai cấu trúc câu lệnh
d) sai cấu trúc câu lệnh
e) biến đếm có kiểu là kiểu số
thực nên không hợp lệ.
Bài 4 SGK (T61)
Giá trị của j sau mỗi lần lặp sẽ
được tăng thêm 2 đơn vị
2, 4, 6, 8, 10, 12.
Bài 6 SGK (T 61)
- Mô tả thuật toán.
Bước 1: nhập n
A<-0, i<-1
Bước 2: A<- 2\i(i+2)
Bước 3: i<-i+1
Bước 4: nếu i<=n quay về bước 2
Bước 5: ghi kết quả A ra màn

hình và kết thúc thuật toán.
4) Củng cố:
- Giáo viên hệ thống lại toàn bộ nội dung bài học.
- Giáo viên nhận xét tiết học, rút kinh nghiệm tiết học.
5) Hướng dẫn về nhà:
- Học bài theo 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.
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
11
Trường THCS Lý Tự Trọng Giáo án tin học
8
- 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à viết chương trình pascal bài 6 SGK (T61)
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*®*=*=*=*=
Ngày Dạy: / /
Tuần: 22
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 :
- Hiểu Hoạt động của câu lệnh lặp với số lần biết trước for do trong Pascal
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 độ:
- Có ý thức, kỉ luật, nghiêm túc, trình bày một vấn đề chặt chẽ, rõ ràng.
II/ CHUẨN BỊ:
 GV: máy chiếu
 HS: tìm hiểu một số bài toán và chỉ ra thuật toán
III/ TIẾN TRÌNH LÊN LỚP.
1)Ổn định tổ chức:(1’)
- Kiểm tra sĩ số:
2)Kiểm tra bái cũ:(5’)
- Câu hỏi: ? Nêu cấu trúc câu lệnh lặp đơn, câu lệnh lặp ghép, có biết ý nghĩa của
câu lệnh lặp
3)Bài mới:(31’)
Ho¹t ®éng cña thÇy vµ trß Néi dung ghi b¶ng
Hoạt động 1 : nội dung
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
12
Trường THCS Lý Tự Trọng Giáo án tin học
8
GV: giành thời gian 15 phút để HS lập trình
bài toán đã làm
Bài 1
HS : đọc đề
GV :? Nêu cách giải?
HS : nêu phương án
GV :?Cần nhân 1 số với các số từ 1 đền 10.
Gọi số đó là số N ta sẽ sử dụng vòng lặp xác
định từ giá trị đầu đến giá trị cuối là bao
nhiêu?

HS : từ 1 đến 10
GV :? yêu cầu mở rộng: in ra tất cả bảng cửu
chương từ 1 đến 10?
HS : nêu phương án
GV :? giá trị N lúc này có phải nhập nữa
không?
HS : không
GV :?Giá trị N chạy từ bao nhiêu đến bao
nhiêu?
HS : từ 1 đến 10
GV : =>Vậy ta cần một vòng lặp N từ 1 đến
10
GV: yêu cầu HS làm thành hai bài khác nhau
HS : lập trình và chạy chương trình
GV : ? Quan sát kết quả nhận được? Kết quả
có dễ dàng quan sát không?
HS : sửa theo hướng dẫn của GV.
GV :? Thực hiện bài 2
GV :? Để kết quả trông dễ nhìn ta sử dụng Câu
lệnh GotoXY(a, b) có tác dụng đưa con trỏ về
cột a, hàng b. WhereX cho biết số thứ tự của
cột và WhereY cho biết số thứ tự của hàng
đang có con trỏ. Ví dụ GotoXY(5,WhereY) đưa
con trỏ về vị trí cột 5 của hàng hiện tại.
Bài 1( SGK)
uses crt;
var N,i:integer;
begin
clrscr;
write('Nhap so N='); readln(N);

writeln;
writeln('Bang nhan ',N);
writeln;
for i:=1 to 10 do writeln(N,' x
',i:2,' = ',N*i:3);
readln
end.
In toàn bộ bảng cửu chương
uses crt;
var N,i:integer;
begin
clrscr;
writeln('Bang nhan ',N);
writeln;
for N:=1 to 10 do
for i:=1 to 10 do writeln(N,' x
',i:2,' = ',N*i:3);
readln
end.
Chỉnh sửa câu lệnh lặp của
chương trình như sau:
for i:=1 to 10 do
begin
GotoXY(5,WhereY); writeln(N,' x
',i:2,' = ',N*i:3); writeln
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
13
Trường THCS Lý Tự Trọng Giáo án tin học
8

HS : Dịch và chạy chương trình
GV: Giúp HS sửa một số lỗi
end;
4) Củng cố:(5’)
GV : goi HS đọc phần tổng kết
GV : yêu cầu HS đọc phần đọc thêm
5) Hướng dẫn về nhà:(2’)
Tập lập trình một số BTVN của tiết trước, buổi sau sẽ chữa bài và chạy chương
trình , lập trình bài đọc thêm để kiểm tra kết quả số Pi
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*®*=*=*=*=
Ngày Dạy: / /
Tuần: 23
Tiết: 43
Bài thực hành 5:
SỬ DỤNG LỆNH LẶP FOR DO
(tiếp)
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Ị:
 GV: Giáo án, máy tính, sgk

 HS: tìm hiểu bài.
III/ TIẾN TRÌNH LÊN LỚP.
1)Ổn định tổ chức:
- Kiểm tra sĩ số:
2)Kiểm tra bái cũ:
Câu hỏi:
Câu 1: Cho ví dụ về hoạt động được thực hiện lặp lại trong cuộc sống hằng
ngày?
Câu 2: Hãy cho biết tác dụng của câu lệnh lặp với số lần biết trước?
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
14
Trường THCS Lý Tự Trọng Giáo án tin học
8
Câu 3: Trình bày cấu trúc của câu lệnh lặp và nêu cách hoạt động của nó?
3)Bài mới:
Ho¹t ®éng cña thÇy vµ trß Néi dung ghi b¶ng
Hoạt động 1 : nội dung
- Tương tự như bài 1, GV cho HS gõ bài làm
của mình ở nhà vào máy.
- HS thực hiện theo yêu cầu của GV.
- GV quan sát trên máy HS và chữa lại chỗ sai.
- HS quan sát và theo dõi
- GV cho HS chữa bài vào vở
- HS ghi bài vào vở
Bài tập 3 :
- GV: Đưa ra nội dung của bài toán: 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ả.

- 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: Nghiên cứu bài toán, tìm input và output
- 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: đọc, phân tích câu lệnh, tìm hiểu hoạt
động của chương trình
Bài 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.
Bài tập 3 :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);
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
15
Trường THCS Lý Tự Trọng Giáo án tin học
8
- 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 tham gia hoạt động của GV
- 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ả.
Bài tập 4:
- 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.
Writeln(‘Bang nha’,n);
Writeln;
For i:=1 to 10 do
Writeln(n,’x’,i:2,’=’,n*i:3);
Readln;
End.
Bài tập 4: Sử dụng lệnh For
lồng trong for
* Câu lệnh for lồng trong for:
- For <biến đếm1:= giá trị
đầu> to <giá trị cuối> do
For <biến đếm 2:=giá trị
đầu> to <giá 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.
4) Củng cố:
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
16
Trường THCS Lý Tự Trọng Giáo án tin học
8
- 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
5) Hướng dẫn về nhà:
- Học bài theo 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.
- Xem trước các bài tập để tiết sau làm bài tập.
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*®*=*=*=*=
Ngày Dạy: / /
Ngày Dạy: / /
Tuần: 23 + 24
Tiết: 44 + 45
Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

I/ MỤC TIÊU:
1) Kiến thức :
- Biết nhu cầu cần có 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;
- Biết ngôn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để chỉ dẫn
máy tính thực hiện lặp đi lặp lại công việc đến khi một điều kiện nào đó được thoả
mãn;
2) Kĩ năng:
- 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.
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Ị:
- Giáo viên: SGK, máy chiếu, các ví dụ về chương trình.
- Học sinh: Dụng cụ học tập.
III/ TIẾN TRÌNH LÊN LỚP.
1)Ổn định tổ chức:
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
17
Trường THCS Lý Tự Trọng Giáo án tin học
8
- Kiểm tra sĩ số:
2)Kiểm tra bái cũ:
Câu hỏi:
- Viết thuật toán tính tổng 100 số tự nhiên đầu tiên 1,2,3,…,99,100
Trả lời
Bước 1. SUM ← 0; i ← 0.
Bước 2. i ← i + 1.
Bước 3. Nếu i ≤ 100, thì SUM ← SUM + i và quay lại bước 2.

Bước 4. Thông báo kết quả và kết thúc thuật toán.
3)Bài mới:
Với bài toán trên, trong Turbo Pascal ta sử dụng vòng lặp for…to…do thì sẽ thực hiện dễ
dàng . Nhưng nếu ta thay số 100 bởi n ( tính tổng n số tự nhiên đầu tiên ) thì ta sẽ gặp
nhiều khó khăn trong việc sử dụng vòng lặp for…to…do, bởi lúc này số lần lặp không
biết trước. Vậy ta phải làm như thế nào ? Để giải quyết bài toán này chúng ta đi tìm hiểu
bài mới.
Hoạt động của GV - HS Nội dung
Hoạt động 1: Các hoạt động lặp với số lần chưa biết trước
- GV: Nhắc lại tác dụng của câu lệnh lặp với số lần
lặp biết trước?
- Để biết được các hoạt động lặp GV gọi HS đọc ví
dụ.
- HS lắng nghe
- GV : Yêu cầu HS đọc ví dụ 1.
- HS : 2-3 HS đọc ví dụ.
- GV: Phân tích ví dụ
- HS: Chú ý lắng nghe
- GV: Trong ví dụ 1, Long gọi cho Trang, Long có
xác định được Long sẽ gọi cho Trang mấy lần hay
không? Khi nào hoạt động gọi điện thoại của Long
kết thúc?
- HS trả lời: Khi có người nhấc máy
- GV: Yêu cầu HS đọc ví dụ 2
- HS: 2-3 HS đọc ví dụ.
- GV: Phân tích ví dụ
- HS: Chú ý lắng nghe
- GV: Hướng dẫn HS xây dựng thuật toán
- HS: Nghe giáo viên hướng dẫn, sau đó tự xây
dựng thuật toán

- GV: Chạy tay cho học sinh xem ( Chỉ nên chạy
tay thử từ 1 đến 10 )
- HS : Chú ý lắng nghe và tiếp thu.
- HS ghi vở ví dụ 2
1. Các hoạt động lặp với số lần
chưa biết trước:
a/ Ví dụ 1:

b/ Ví dụ 2: Nếu cộng lần lượt n số
tự nhiên đầu tiên (n = 1, 2, 3, ),
Cần cộng bao nhiêu số tự nhiên
đầu tiên để ta nhận được tổng T
n
nhỏ nhất lớn hơn 1000?
Giải :
Kí hiệu S là tổng cần tìm và ta có
thuật toán như sau:
+ Bước 1. S
←
0, n
←
0.
+ Bước 2. Nếu S ≤ 1000, n
←
n +
1; ngược lại chuyển tới bước 4.
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
18
Trường THCS Lý Tự Trọng Giáo án tin học

8
- GV: Việc thực hiện lập lại các phép cộng trên với
số lần chưa biết trước phụ thuộc vào điều kiện gì?
Phép cộng chỉ dừng khi nào?
- HS trả lời: Điều kiện s<=1000 và chỉ dừng khi
kết quả kiểm tra là sai.
- GV : Giới thiệu sơ đồ khối
- HS theo dõi và tiếp thu
+ Bước 3. S
←
S + n và quay lại
bước 2.
+ Bước 4. In kết quả : S và n là số
tự nhiên nhỏ nhất sao cho S >
1000. Kết thúc thuật toán.
* Nhận xét : Để viết chương trình
chỉ dẫn máy tính thực hiện các hoạt
động lặp như trong các ví dụ trên,
ta có thể sử dụng câu lệnh có dạng
lặp với số lần chưa biết trước.
Hoạt động 3: Ví dụ về lệnh lặp với số lần chưa biết trước
- Trước khi đi tìm hiểu cú pháp của câu lệnh lặp với
số lần chưa biết trứơc GV gọi HS nhắc lại cú pháp
của câu lệnh lặp với số lần biết trước.
- HS trả lời
- GV chốt ý:
For<điều kiện>:=<gt đầu> to <gt cuối> do
lệnh;
- GV: Có thể sử dụng lệnh lặp với số lần lặp chưa
biết trước trong các chương trình lập trình. Sau đây

ta xét câu lệnh và ví dụ trong TP.
- GV: Giới thiệu cú pháp lệnh:
While <điều kiện> do <câu lệnh>;
Trong đó:
+ Điều kiện thường là phép toán so sánh
+ Câu lệnh có thể là câu lệnh đơn giản hay câu
lệnh phức tạp.
- HS: chú ý lắng ghe và ghi chép.
- GV: Dựa vào cú pháp hãy nêu hoạt động của câu
lệnh lặp với số lần chưa biết trước?
- HS nêu hoạt động của câu lệnh lặp với số lần
chưa biết trước.
- GV: Giới thiệu chương trình mẫu.
- GV: Xét ví dụ 3
Chúng ta biết rằng, nếu n càng lớn thì
1
n
càng nhỏ,
nhưng luôn luôn lớn hơn 0. Với giá trị nào của n thì
2. Ví dụ về lệnh lặp với số lần
chưa biết trước:
Trong Pascal câu lệnh lặp với số
lần chưa biết trước có dạng:
while <điều kiện> do <câu lệnh>;
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.
* Hoạt động:

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.
Ví dụ 3.
Với giá trị nào của n ( n>o ) thì
1
n

< 0.005 hoặc
1
n
< 0.003? Chương
trình dưới đây tính số n nhỏ nhất
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
19
Trường THCS Lý Tự Trọng Giáo án tin học
8
1
n
< 0.005 hoặc
1
n
< 0.003 ?
- GV cho HS độc ví dụ 3 trong SGK
- 2 – 3 HS đọc ví dụ 3
- GV: Giới thiệu chương trình mẫu sgk ( Giáo viên

in chương trình mẫu trên)
- HS: Quan sát
- GV: Chạy tay cho học sinh xem
- HS: chú ý nghe và tự chạy tay lại
- GV: Yêu cầu học sinh mở máy tính và mở chương
trình ví dụ 3 ( giáo viên chuẩn bị chương trình mẫu
và đưa lên các máy )
- HS: thực hiện
- GV: Cho học sinh chạy chương trình trên máy
- HS: thực hiện
- GV: Yêu cầu hs thay điều kiện sai_so = 0.003
thành 0.002 ; 0.001 ; 0.005 ;
- HS: thực hiện
- GV yêu cầu HS đọc ví dụ 4/
- HS đọc ví dụ 4
- GV: Cho học sinh quan sát chương trình
- HS quan sát chương trình
- GV: Chạy tay cho học sinh xem chương trình mẫu
- HS: Chú ý nghe và tự chạy tay lại
- GV: Cho học sinh chạy chương trình trên máy.
- HS thực hiện yêu cầu
- GV: Chạy chương trình này, ta nhận được giá trị
ntn?
- HS: Nếu chạy chương trình này ta sẽ nhận được n
= 45 và tổng đầu tiên lớn hơn 1000 là 1034.
- GV: Giới thiệu ví dụ 5.
- GV: Cho học sinh quan sát chương trình
- HS quan sát chương trình
- GV: Ví dụ này cho thấy rằng chúng ta có thể sử
dụng câu lệnh while…do thay cho câu lệnh for…

do.
để
1
n
nhỏ hơn một sai số cho
trước :
uses crt;
var x: real;
n: integer;
const sai_so=0.003;
begin
clrscr;
x:=1; n:=1;
while x>=sai_so do begin
n:=n+1; x:=1/n end;
writeln('So n nho nhat de 1/n <
',sai_so:5:4, 'la ',n);
readln
end.
Ví dụ 4 . Chương trình Pascal dưới
đây thể hiện thuật toán tính số n
trong ví dụ 2
var S,n: integer;
begin
S:=0; n:=1;
while S<=1000 do
begin
S:=S+n; n:=n+1;
end;
writeln('So n nho nhat de tong

> 1000 la ',n);
writeln('Tong dau tien > 1000
la ',S);
end.
Ví dụ 5: Viết chương trình tính
tổng
1 1 1
1
2 3 100
T
= + + + +
Hoạt động 4: Lặp vô hạn lần – Lỗi lập trình cần tránh
- GV: Khi viết chương trình sử dụng cấu trúc lặp
cần chú ý tránh tạo nên vòng lặp không bao giờ kết
thúc.
Chẳng hạn, chương trình dưới đây sẽ lặp lại vô tận:
3. Lặp vô hạn lần – Lỗi lập trình
cần tránh:
- Khi thực hiện vòng lặp, điều kiện
trong câu lệnh phải được thay đổi
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
20
Trường THCS Lý Tự Trọng Giáo án tin học
8
var a:integer;
begin
a:=5;
while a<6 do writeln('A');
end.

- HS quan sát
- Vì sao chương trình trên lặp vô hạn lần?
- HS trả lời: Trong chương trình trên, giá trị của
biến a luôn luôn bằng 5, điều kiện a<6 luôn luôn
đúng nên lệnh writeln('A') luôn được thực hiện.
- Do vậy, khi thực hiện vòng lặp, điều kiện trong
câu lệnh phải được thay đổi để sớm hay muộn giá
trị của điều kiện được chuyển từ đúng sang sai. Chỉ
như thế chương trình mới không "rơi" vào những
"vòng lặp vô tận".
để sớm hay muộn giá trị của điều
kiện được chuyển từ đúng sang sai.
Chỉ như thế chương trình mới
không "rơi" vào những "vòng lặp
vô tận".
4) Củng cố:
- Đọc ghi nhớ.
- Nêu vài ví dụ về hoạt động lặp với số lần chưa biết trước?
- Nêu cú pháp câu lệnh lặp While do? Dựa trên sơ đồ hãy nêu quá trình thực hiện câu
lệnh lặp?
5) Hướng dẫn về nhà:
- Học bài theo vở ghi
- Làm các bài tập vào vở.
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
= *=*=*=*®*=*=*=*=
Ngày Dạy: / /

Tuần: 24
Tiết: 46
BÀI TẬP
I/ MỤC TIÊU:
1) Kiến thức :
- Củng cố kiến thức vòng lặp với số lần lặp chưa biết trước và câu lệnh ghép.
2) Kĩ năng:
- Viết được chương trình Pascal có sử dụng vòng lặp While do
- Biết sử dụng câu lệnh ghép.
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
21
Trường THCS Lý Tự Trọng Giáo án tin học
8
- Rèn kỹ năng đọc hiểu chương trình có sử dụng vòng lặp while do
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Ị:
- GV: Sách giáo khoa, giáo án, chuẩn bị một số thuật toán và chương trình .
- HS: Vë ghi.
III/ TIẾN TRÌNH LÊN LỚP.
1)Ổn định tổ chức:
- Kiểm tra sĩ số:
2)Kiểm tra bái cũ:
- Kiểm tra bài cũ trong quá trình làm bài tập
3)Bài mới:
Hoạt động của GV - HS Nội dung
Hoạt động 1: Chốt lại kiến thức trọng tâm để áp dụng giải bài tập
- GV: Em hãy nhắc lại cú pháp lệnh
While do

- HS trả lời
- GV chốt ý và nhắc lại lần nữa cho HS
nắm vững
- HS chú ý theo dõi và tiếp thu
- GV yêu cầu HS ghi vở
- HS ghi vở
- GV: Lưu ý HS cách thực hiện và tránh
lệnh lặp vô hạn lần.
- HS lắng nghe.
while <điều kiện> do <câu lệnh>;
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.
Câu lệnh lặp này được thực hiện:
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.
Hoạt động 2: Giải bài tập trong SGK
Bài 2 trang 71 SGK: Phát biểu sự khác
Bài 2: Sự khác biệt giữa câu lệnh lặp
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
22
Trường THCS Lý Tự Trọng Giáo án tin học
8
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 yêu cầu HS đọc và nghiên cứu bài
tập 2.
- HS đọc đề
- GV cho HS đứng tại chỗ trả lời câu hỏi
- HS suy nghĩ, thảo luận và trả lời
- GV goi 1 HS khác nhận xét
- 1HS khác đứng tại chỗ nhân xét câu
trả lời của bạn
- GV nhận xét, bổ sung và cho HS ghi
vở
- HS tiếp thu và ghi vở
Bài 3 trang 71 SGK: Tìm hiểu các thuật toán
sau đây và cho biết khi thực hiện thuật toán, máy
tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết
thúc, giá trị của S bằng bao nhiêu? Viết chương
trình Pascal thể hiện các thuật toán đó.
a) Thuật toán 1:
Bước 1. S ← 10, x ← 0.5.
Bước 2. Nếu S ≤ 5.2, chuyển tới bước 4.
Bước 3. S ← S − x và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật
toán.
b) Thuật toán 2:
Bước 1. S ← 10, n ← 0.
Bước 2. Nếu S = 10, chuyển tới bước 4.
Bước 3. n ← n + 3, S ← S−n quay lại
bước 2.
Bước 4. Thông báo S và kết thúc thuật
toán.

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 là ở các
điểm sau đây:
a) Như tên gọi của nó, câu lệnh lặp với
số lần lặp cho trước chỉ thị cho máy
tính thực hiện một lệnh hoặc một nhóm
lệnh với số lần đã được xác định từ
trước, còn với câu lệnh lặp với số lần
lặp chưa biết trước thì số lần lặp chưa
được xác định trước.
b) Trong câu lệnh lặp với số lần cho
trước, điều kiện là giá trị của một biến
đếm có giá trị nguyên đã đạt được giá
trị lớn nhất hay chưa.
Trong câu lệnh lặp với số lần cho
trước, câu lệnh được thực hiện ít nhất
một lần, sau đó kiểm tra điều kiện.
Trong câu lệnh lặp với số lần chưa xác
định trước, trước hết điều kiện được
kiểm tra. Nếu điều kiện được thoả
mãn, câu lệnh mới được thực hiện. Do
đó có thể có trường hợp câu lệnh hoàn
toàn không được thực hiện.
Bài 3
a) Thuật toán 1: 10 vòng lặp được thực
hiện. Khi kết thúc thuật toán S = 5.0.
Đoạn chương trình Pascal tương ứng:
S:=10; x:=0.5;
while S>5.2 do S:=S-x;
writeln(S);

b) Thuật toán 2: Không vòng lặp nào
được thực hiện vì ngay từ đầu điều
kiện đã không được thỏa mãn nên các
bước 2 và 3 bị bỏ qua.
S = 10 khi kết thúc thuật toán. Đoạn
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
23
Trường THCS Lý Tự Trọng Giáo án tin học
8
- GV yêu cầu HS đọc đề bài tập 3
- HS đọc đề theo yêu cầu của GV
- GV cho HS thảo luận nhóm để trả lời
câu hỏi
( nhóm 1 và 2: thuật toán 1, nhóm 3 và
4: thuật toán 2)
- HS thảo luận nhóm và ghi lên bảng
phụ
- GV gọi đại diện nhóm trả lời, các
nhóm khác nhận xét, bổ sung
- HS quan sát và ghi vở
- GV yêu cầu HS dựa vào thuật toán để
viết chương trình Pascal
- HS viết chương trình theo yêu cầu bài
tập.
Bài 5: Hãy chỉ ra lỗi trong các câu lệnh
sau đây:
a)X:=10; while X:=10 do X:=X+5;
b)X:=10; while X=10 do X=X+5;
c)S:=0; n:=0; while S<=10 do n:=n+1;

S:=S+n;
- GV cho HS nghiên cứu bài tập 5
- HS thực hiện yêu cầu của GV
- GV gọi HS đứng tại chỗ trả lời
- HS trả lời
- GV nhận xét
- HS theo dõi, tiếp thu và ghi vở
chương trình Pascal tương ứng:
S:=10; n:=0;
while S<10 do
begin n:=n+3;
S:=S-n end;
writeln(S);
Bài 5:
a) Thừa dấu hai chấm trong điều kiện;
b) Thiếu dấu hai chấm trong câu lệnh
gán;
c) Thiếu các từ khóa begin và end
trước và sau các lệnh n:=n+1; S:=S+n,
do đó vòng lặp trở thành vô tận.
4) Củng cố:
- GV củng cố lại kiến thức với 3 loại vòng lặp đã học.
- Ôn tập kiến thức lí thuyết từ đầu HK2.
- Tự làm lại các bài tập.
- Chuẩn bị tốt cho bài kiểm tra 1 tiết.
- Về nhà làm thêm các bài tập sau:
Bài 1: Lập trình tính tổng dùng lệnh lặp While do. Trong dú n là số tự nhiên
được nhập từ bàn phím.
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011

24
Trường THCS Lý Tự Trọng Giáo án tin học
8
1 1 1
1 ( )
2 3
A n Z
n
= + + + ∈

GIẢI
Program tinhA;
Uses CRT;
Var i, n: integer;
tong: real;
BEGIN
Clrscr;
write('cho so tu nhien n: '); Readln(n);
tong:=0; i:=1;
while i<= n do
Begin
tong:= tong+ 1/i;
i: = i+1;
End;
writeln(' Tong can tim la: ', tong:12:6);
Readln;
END.
Bài 2: Viết chương trình tìm ƯCLN(a,b). Biết a, b được nhập từ bàn phím. a,b
Z∈
Giải

Program timUCLN;
Uses Crt;
Var a,b,r,a1,b1: integer;
BEGIN
ClrScr;
Write(‘Nhap so thu nhat, a= ‘); Readln(a); a1:= a;
Write(‘Nhap so thu hai, = ‘); Readln(b); b1:= b;
While a mod b <> 0 do
Begin
r:= a mod b;
a: = b; b: = r;
End;
Write (‘ Vay UCLN(‘, a1, ‘;’,b1,’)=’,b:2);
Readln
END.
5) Hướng dẫn về nhà:
- Học bài theo vở ghi
- Làm các bài tập vào vở.
IV. RÚT KINH NGHIỆM.
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Giáo viên: Bùi Cảnh Dương Năm học 2010 -
2011
25