GIAO AN HK2 TIN 8 CHU DE IN THOI
Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (348.56 KB, 30 trang )
Trường THCS Phan Bội Châu
Giáo án Tin học 8
CHỦ ĐỀ:
CÂU LỆNH LẶP
(Số tiết: 12)
I. YÊU CẦU KIẾN THỨC, KĨ NĂNG, THÁI ĐỘ:
1. Kiến thức:
- Biết nhu cầu cần có cấu trúc lặp trong biểu diễn thuật thuật toán.
- Hiểu được cấu trúc lặp với số lần biết trước, cấu trúc lặp kiểm tra điều kiện trướ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.
- Hiểu 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 được cú pháp và hoạt động của câu lệnh lặp với số lần không biết trước.
- Biết được một số lỗi lập trình cần tránh.
- Biết lệnh ghép trong Pascal.
2. Kĩ năng:
- Biết cách vận dụng đúng đắn cấu trúc lặp vào tình huống cụ thể.
- Viết đúng lệnh For...do trong một số tình huống đơn giản.
- Viết đúng lệnh While...do trong một số tình huống đơn giản.
- 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.
- Rèn luyện kĩ năng sử dụng các câu lệnh lặp không xác định trong Pascal
3. Thái độ:
- Tạo hứng thú cho các em say mê mơn học.
II. BẢNG MƠ TẢ U CẦU CẦN ĐẠT:
Vận dụng cấp độ
Vận dụng cấp độ
Nội dung
Nhận biết
Thông hiểu
thấp
cao
- Hiểu được
cấu trúc lặp
Ghi được cấu
với số lần biết Viết được chương
Câu lệnh
trúc câu lệnh
trước
trình với vịng lặp For
lặp.
lặp
- Viết được câu đơn giản.
lệnh tính tổng
và tích.
Cú pháp của
Số vịng lặp
- Biến đếm được tự
câu lệnh lặp
động tăng thêm một
đơn vị sau mỗi vòng
lặp.
Câu lệnh
lặp For …
to … do
- Rút được kinh
nghiệm khi thực
hành sử dụng câu
lệnh lặp For … to …
do.
- Rút được kinh
nghiệm khi thực
1
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
hành sử dụng câu
lệnh lặp For … to …
do, lệnh Goto(X,Y).
Hoạt động
lặp với số
lần chưa
biết trước
Nêu được 1 số vd về
công việc lặp lại với
số lần khơng biết
trước.
Vịng lặp
For … do;
vịng lặp
While … do
Sử dụng được vòng
lặp For … do thay cho
vòng lặp While … do
Sử dụng câu lệnh lặp
For…do để thay thế
cho câu lệnh lặp
While…do .
Nhắc lại được
cấu trúc câu
lệnh lặp
While…do
Nhận biết cú
Hiểu và so sánh
1. Vòng lặp
pháp của vòng được các câu
For … do
lặp.
lệnh lặp.
Nhận biết cú
Hiểu và so sánh
2. Vịng lặp
Mơ tả được thuật
pháp của vịng được các câu
While … do
toán
lặp.
lệnh lặp.
Bước 4. Xác định năng lực hướng tới:
- Năng lực đọc hiểu
- Năng lực CNTT
- Năng tự giải quyết vấn đề
TUẦN 20 - TIẾT 39:
BÀI 7: CÂU LỆNH LẶP
I. MỤC TIÊU BÀI HỌC:
* Kiến thức:
- Biết nhu cầu cần có cấu trúc lặp trong biểu diễn thuật thuật toán.
- Hiểu được cấu trúc lặp với số lần biết trước, cấu trúc lặp kiểm tra điều kiện trước.
* Kĩ năng:
- Biết cách vận dụng đúng đắn cấu trúc lặp vào tình huống cụ thể.
* Thái độ:
- Có ý thức tự giác học bài
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
2. Kiểm tra bài cũ: Em hãy viết chương trình tính tổng các số 1, 2, 3, 4, 5
ĐVĐ: Để máy tính thực hiện tính tổng của 100 số tự nhiên đầu tiên thì chúng ta ph ải ra
lệnh cho máy bằng lệnh nào? Để trả lời cho câu hỏi trên chúng ta đi vào nghiên c ứu bài h ọc
ngày hôm nay. Giáo viên ghi đầu bài lên bảng.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
Hoạt động 1: Câu lệnh lặp – một lệnh thay cho nhiều lệnh
GV: Yêu cầu 1 HS đọc ví dụ 1 trong SGK.
2. Câu lệnh lặp - một lệnh thay nhiều
HS: Đọc ví dụ 1
lệnh
GV: Gọi 1 hs lên bảng vẽ một hình vng Ví dụ 1: Giả sử cần vẽ 3 hình vng có
cạnh 1 đơn vị độ dài (20cm) và yêu cầu cạnh 1 đơn vị như sau:
cả lớp theo dõi bạn thực hiện các thao tác Mỗi hình vng là ảnh của hình bên trái
trên bảng.
nó dịch chuyển 1 khoảng cách 2 đơn vị.
HS: Lên bảng vẽ hình vng
GV: ? u cầu 1 hs mô tả các bước bạn vẽ
trên bảng.
HS: Trả lời
GV: ? Vậy khi bạn vẽ 1 hình vng đó thực
hiện bao nhiêu thao tác?
HS: Có thể vẽ 4 đoạn thẳng.
GV: Gợi ý thêm thao tác quay thước.
- Bổ sung trình bày các bước làm.
Bước 1: Vẽ hình vng (vẽ liên tiếp 4
- Như vậy khi vẽ hình vng có những cạnh và trở về đỉnh ban đầu)
thao tác lặp đi lặp lại. Thuật toán sau sẽ Bước 2: Nếu số hình vng đã được vẽ ít
mơ tả các bước để vẽ hình vng.
hơn 3, di chuyển bút vẽ về bên phải 2 đơn
HS: Cùng thảo luận, đưa ra ý tưởng
vị và trở lại bước 1; ngược lại thì kết thúc
GV: Mơ tả thuật tốn trên bảng
thuật tốn.
HS: Chú ý quan sát các bước mơ tả
Riêng với 1 bài tốn vẽ hình vng thì
thao tác chính là vẽ bốn cạnh bằng nhau,
hay lặp lại 4 lần thao tác vẽ đoạn thẳng
3
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
Thuật toán mơ tả các bước để vẽ hình
vng.
Bước 1: k ← 0 (k là số đoạn thẳng đó vẽ
được).
Bước 2: k ← k+1. Vẽ đoạn thẳng 1 đơn vị
độ dài và quay thước 900 sang phải.
GV: Yêu cầu 1 HS đọc ví dụ 2 trong SGK.
HS: Đọc ví dụ 2
GV: Mơ tả thuật tốn tính tổng các số tự
nhiên từ 1→ 100.
Bước 3: Nếu k<4 thì quay lại bước 2;
ngược lại kết thúc.
-> k là biến đếm
Ví dụ 2: Thuật tốn tính tổng
S = 1 + 2 + 3 + … + 100
HS: Chú ý ghi chép
Bước 1: S ← 0; i ← 0.
Bước 2: i← i + 1
Bước 3: nếu i ≤ 100, thì S ← S + i và quay
lại bước 2; ngược lại kết thúc.
-> i là biến đếm
Mơ tả thuật tốn trên 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
chỉ với 1 câu lệnh. Đó là các câu lệnh lặp
4. CỦNG CỐ
- Tóm tắt kiến thức trọng tâm đã học.
5. 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.
- Đọc tiếp phần còn lại của bài để giờ sau tiếp tục học.
4
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
TUẦN 20 - TIẾT 40:
BÀI 7: CÂU LỆNH LẶP (tt)
I. MỤC TIÊU BÀI HỌC:
* Kiến thức:
- 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.
* Kĩ năng:
- 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.
- Viết đúng được lệnh for … do trong một số tình huống đơn giản.
- Biết lệnh ghép trong Pascal.
* Thái độ:
- Học sinh tích cực trong q trình học tập.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
? Hãy viết cấu trúc câu lệnh lặp và hoạt động của cấu trúc.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
Hoạt động 1: Câu lệnh lặp for … do
GV: Yêu cầu 1 HS đọc mục 2
- Trong Pascal cấu trúc lệnh lặp có dạng:
HS: Đọc mục 3
For <biến đếm>:= <giá trị đầu> to
GV: Đưa ra cấu trúc câu lệnh lặp
cuối> do <câu lệnh>;
? for, to, do là gì?
Trong đó: for, to, do là từ khố, biến đếm
Gọi 1 HS đứng tại chỗ trả lời
là biến kiểu nguyên, giá trị đầu và giá trị
HS: Chú ý lắng nghe và trả lời câu hỏi
cuối là các giá trị nguyên.
5
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
GV: Chốt lại câu trả lời của HS
- Đây là câu lệnh for dạng tiến
HS: Ghi vào vở
- Câu lệnh lặp sẽ thực hiện câu lệnh nhiều
lần, mỗi lần là 1 vòng lặp. Số vịng lặp là
GV: Giải thích hoạt động của câu lệnh lặp
biết trước và bằng:
giá trị đầu - giá trị cuối + 1
HS: Chú ý quan sát
- Hoạt động: Khi thực hiện, ban đầu biến
đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp
biến đếm được tự động tăng thêm 1 đơn
GV: Mơ tả hoạt động của ví dụ 3 để HS
thấy được số vịng lặp.
thúc.
Ví dụ về câu lệnh lặp
- Bảng lặp
Lần lặp thứ
1
1
1
2
2
3
3
4
4
5
vị cho đến khi bằng giá trị cuối thì kết
5
Kết quả
Day la lan lap thu
- Ví dụ 3: Chương trình đưa ra màn hình
1
Day la lan lap thu
Program Lap;
2
Day la lan lap thu
thứ tự lần lặp.
var i: Integer;
begin
3
Day la lan lap thu
for i:= 1 to 10 do
4
Day la lan lap thu
readln
5
HS: Chú ý quan sát và ghi vào vở
GV: Để in 1 chữ "O" ra màn hình ta sử
dụng lệnh?
HS: Nguyên cứu trả lời câu hỏi
GV: ? Muốn viết chương trình ghi nhận
các vị trí của 1 quả trứng rơi từ trên cao
xuống? thì như VD trên ta có thể lặp lại
lệnh writeln('O') nhiều lần.
? Lệnh delay(100) có ý nghĩa gì?
writeln('Day la lan lap thu ',i);
end.
Ví dụ 4: Để in 1 chữ "O" ra màn hình ta sử
dụng lệnh Writeln('O');
- Ví dụ cho lặp 20 lần.
Program Trung_roi;
uses crt;
var i: Integer;
begin
clrscr;
for i:= 1 to 20 do
begin
writeln('O'); delay(100)
6
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
HS: Là hàm khai báo thời gian rơi nhanh
hay chậm của chữ O).
GV: Chốt lại câu trả lời, y/c ghi vào vở
Giải thích khi sử dụng câu lệnh ghép ta
end;
readln
end.
- delay(x): Dừng chương trình trong
x miligiây trước khi chạy tiếp.
phải được đặt trong 2 từ khóa begin và
end.
4. CỦNG CỐ
- Cấu trúc lặp trong chương trình dùng để làm gì?
5. HƯỚNG DẪN VỀ NHÀ
- Học bài trong vở ghi và SGK. - Làm bài tập trong SGK.
TUẦN 21 - TIẾT 41:
BÀI 7: CÂU LỆNH LẶP (tt)
I. MỤC TIÊU BÀI HỌC:
* Kiến thức:
- 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.
* Kĩ năng:
- 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.
- Viết đúng được lệnh for … do trong một số tình huống đơn giản.
- Biết lệnh ghép trong Pascal.
* Thái độ:
- Học sinh tích cực trong q trình học tập.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
? Hãy viết cấu trúc câu lệnh lặp và hoạt động của cấu trúc.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
Hoạt động 1: Tính tổng và tích bằng câu lệnh lặp
Ví dụ 5: Chương trình tính tổng của N số
GV: Bài này giống ý tưởng trong ví dụ tính tự nhiên đầu tiên, với N được nhập vào từ
tổng 100 số tự nhiên đầu tiên. Từ ví dụ bàn phím.
7
Giáo viên bộ mơn: Ngơ Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
Program Tinh_tong;
đó hãy áp dụng câu lệnh for.. do để giải uses crt;
quyết bài này
var N, i : integer;
S : longint;
? Trong chương trình ta sử dụng những
begin
biến gì? những câu lệnh gì?
clrscr;
HS: Trả lời câu hỏi
Write('Nhap so N='); Readln(N);
S := 0;
for i:= 1 to N do S:= S + i;
writeln('Tong cua N la:',S);
readln
end.
- Kiểu longint có phạm vi từ -231 đến 231 1.
GV: ? Biến S ta khai báo là kiểu longint nó
là kiểu nguyên nó lưu trữ trong phạm vi
lớn hơn kiểu integer hay không?
HS: Thảo luận rồi đại diện các nhóm trả
lời
Từ đó GV nhận xét và bổ sung
Ví dụ 6: Ta kí hiệu N! là tích N số tự nhiên
đầu tiên: N! = 1.2.3...N
GV yêu cầu HS chạy bài tốn bằng lời
GV: Trong chương trình ta sử dụng những
biến gì? Những câu lệnh gì?
HS: Trả lời câu hỏi
GV: ý tưởng của bài này là tính tích N số tự
nhiên đầu tiên. Vậy ý tưởng bài này giống
ví dụ 5 khơng? chỉ khác là gì?
HS: Chỉ khác là tích.
GV: ? Vậy em nào có thể lên bảng viết
được chương trình?
HS: Lên bảng viết chương trình.
GV yêu cầu HS chạy bài tốn bằng lời
GV: Có chương trình sau:
? Chúng ta cùng mơ tả bài tốn này bằng
lời nhé.
HS: Chú ý lắng nghe
GV: ? Các em thấy kết quả có gì khác với
- Dạng tiến
Program Tinh_giai_thua;
uses crt;
var N, i : integer;
P : longint;
begin
clrscr;
Write('Nhap so N='); Readln(N);
P := 1;
for i:= 1 to N do P:= P*i;
writeln('Tich cua N so tu nhien la:',P);
readln
end.
- Dạng lùi
Program Tinh_giai_thua;
uses crt;
var N, i : integer;
P : longint;
begin
clrscr;
Write('Nhap so N='); Readln(N);
P := 1;
8
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
cách làm ở trên?
HS: Kết quả giống nhau
for i:= N downto 1 do P:= P*i;
writeln('Tich cua N so tu nhien la:',P);
readln
end.
* Câu lệnh for dạng lùi
GV: ? Vậy chương trình này có khác với For <biến đếm> := <giá trị cuối> downto
chương trình trên khơng và khác ở đâu? <giá trị đầu> do <câu lệnh>;
GV đưa ra cấu trúc câu lệnh for dạng lùi
For <biến đếm> := <giá trị cuối> downto
<giá trị đầu> do <câu lệnh>;
4. CỦNG CỐ
- Cấu trúc lặp trong chương trình dùng để làm gì?
5. HƯỚNG DẪN VỀ NHÀ
- Học bài trong vở ghi và SGK. - Làm bài tập trong SGK.
TUẦN 21 - TIẾT 42:
BÀI TẬP
I. MỤC TIÊU BÀI HỌC:
* Kiến thức:
- HS củng cố lại các kiến thức cơ bản đã học về cách xác định bài tốn, q trình gi ải bài
tốn trên máy, lệnh rẽ nhánh If…then, phép chia lấy phần dư mod.
- Nắm sâu hơn về chức năng của lệnh lặp For…to .
* Kĩ năng:
- Xác định INPUT, OUTPUT và mơ tả thuật tốn.
- Sử dụng lệnh lặp For…to để viết chương trình.
* Thái độ:
- Giáo dục HS u thích mơn học.
- Tích cực tham gia xây dựng bài.
- Rèn luyện tinh thần tự giác và ý thức học tập tốt.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
? Hãy viết cấu trúc câu lệnh lặp và hoạt động của cấu trúc.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
Hoạt động 1: Bài tập 1
9
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
- GV gọi lần lượt HS giải đáp các bài tập BÀI TẬP 1: Viết chương trình in ra màn
trong SGK.
hình các số tự nhiên từ 1 đến 100.
- GV chiếu máy.
- GV gợi ý cho HS.
Chương trình:
- HS hoạt động nhóm thảo luận nêu thuật Program SoTN;
toán của bài tập trên.
Uses crt;
- HS các nhóm đại diện trả lời.
Var i:integer;
- Các nhóm khác nhận xét.
Begin
CLRSCR;
For i:= 1 to 100 do
- GV nhận xét và chiếu máy đưa ra các
Write (i:4);
bước của thuật toán để giải quyết vấn đề
Readln;
trên.
- GV gợi ý cho HS khai báo 1 biến để đưa End.
vào làm biến đếm cho vòng lặp For và để
in ra kết quả.
- HS viết chương trình ở bảng nhóm.
- GV gọi các nhóm giải thích các câu lệnh
sử dụng trong chương trình.
- GV nhận xét và chiếu máy đưa ra đáp án
đúng và giải thích các câu lệnh cho HS.
Hoạt động 2: Bài tập 2
- GV gọi lần lượt HS giải đáp các bài tập BÀI TẬP 2: Viết chương trình in ra màn
trong SGK.
hình các số chia hết cho 6 từ 1 đến 100.
- GV chiếu máy.
- GV gợi ý cho HS.
- GV gọi HS trả lời.
- HS sử dụng phiếu học tập tìm INPUT và
OUTPUT của bài tập trên.
- HS hoạt động nhóm thảo luận nêu thuật
tốn của bài tập trên.
- HS các nhóm đại diện trả lời.
- Các nhóm khác nhận xét.
Chương trình:
10
Giáo viên bộ mơn: Ngơ Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
- GV nhận xét và đưa ra đáp án đúng.
Program Chiahetcho5;
- GV gợi ý cho HS khai báo biến để đưa
Uses crt;
vào làm biến đếm cho vòng lặp For và để
Var i:integer;
in ra kết quả và sử dụng câu lệnh If…then
và phép chia lấy phần dư MOD để viết Begin
chương trình.
CLRSCR;
- HS viết chương trình ở bảng nhóm.
For i:= 1 to 100 do
- Các nhóm lần lượt nhận xét.
If i mod 6 = 0 Then
- GV gọi các nhóm giải thích các câu lệnh
sử dụng trong chương trình.
Write (i:4);
Readln;
- GV nhận xét các nhóm và chiếu máy đưa
ra đáp án đúng và giải thích các câu lệnh End.
trong chương trình cho HS hiểu.
Hoạt động 3: Bài tập 3
BÀI TẬP 3: Viết chương trình in ra màn
hình các số lẻ từ 1 đến 200.
- GV chiếu máy.
- GV gợi ý cho HS.
- HS đọc nội dung, yêu cầu của bài toán.
- HS hoạt động nhóm thảo luận nêu thuật
tốn của bài tập trên.
- HS các nhóm đại diện trả lời.
Chương trình:
- Các nhóm khác nhận xét.
Program Sole;
- GV nhận xét và chiếu máy đưa ra các
bước của thuật toán để giải quyết vấn đề
trên.
- GV gợi ý cho HS khai báo biến để đưa
vào làm biến đếm cho vòng lặp For và để
in ra kết quả.
- HS viết chương trình ở bảng nhóm.
Uses crt;
Var i:integer;
Begin
CLRSCR;
For i:= 1 to 100 do
Write (i*2-1:4);
- GV gọi các nhóm giải thích các câu lệnh
Readln;
sử dụng trong chương trình.
- GV nhận xét và chiếu máy đưa ra đáp án End.
đúng và giải thích các câu lệnh cho HS.
4. CỦNG CỐ
11
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
? Yêu cầu HS nhắc lại cú pháp và hoạt động của câu lệnh lặp đã được học ở tiết trước
5. HƯỚNG DẪN VỀ NHÀ
- Học bài cũ.
- Làm bài tập 1 của bài thực hành 5.
- Chuẩn bị tiết sau thực hành.
TUẦN 22 - TIẾT 43:
BÀI THỰC HÀNH 5: SỬ DỤNG LỆNH LẶP FOR ... DO
I. MỤC TIÊU BÀI HỌC:
* 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.
* 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.
* Thái độ:
- Giáo dục HS u thích mơn học.
- Tích cực tham gia xây dựng bài.
- Rèn luyện tinh thần tự giác và ý thức học tập tốt.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
Kiểm tra bài tập đã cho về nhà.
3. Bài mới:
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à.
- GV: yêu cầu mỗi dãy gõ một bài vào máy
Bài 1: Tính tổng của n số tự nhiên đầu tiên
Program tinh_tong;
- HS: gõ chương trình, chạy thử chương Uses crt;
Var i, n: integer; tong: longin;
trình, và báo cáo kết quả.
Begin
- GV: hỗ trợ học sinh trong quá trình thực Clrscr;
Tong:=0;
hành.
Writeln(‘Nhap vao so n’); readln(n);
12
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
- Sau khi kết quả chạy chương trình đã đúng, For i:=1 to n do
Tong: = Tong+i;
gv yêu cầu học sinh chữa bài của mình đã
Writeln(‘Tong của’, n,’so tu nhien dautien
làm ở nhà cho đúng theo chương trình đã la’,tong);
Readln;
chạy.
End.
- GV: yêu cầu các nhóm viết chương trình
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
vào máy.
Program tinh_so_cac_so_duong;
- HS: gõ chương trình, chạy thử chương Uses crt;
Var i,A, dem, n: integer;
trình, và báo cáo kết quả.
Begin
Clrscr;
- GV: Hướng dẫn uấn nắn
Dem:=0;
- Sau khi kết quả chạy chương trình đã đúng, Writeln(‘Nhap vao so n’); readln(n);
gv yêu cầu học sinh chữa bài của mình đã For i:=1 to n do
begin
làm ở nhà cho đúng theo chương trình đã writeln(‘nhap vao so thu’,i); readln(A);
if A>0 then dem:=dem+1;
chạy.
end;
Writeln(‘So cac so duong la’,dem);
- GV: Nhận xét bài làm
Readln;
End.
Hoạt động 2: Bảng cửu chương
- GV: Đưa ra nội dung của bài tốn.
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
- HS: Nghiên cứu bài tốn, tìm input và
hình để có thể quan sát kết quả.
output.
Program Bang_cuu_chuong;
- 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 Uses crt;
trình.
Var i, n: integer;
- HS: đọc, phân tích câu lệnh tìm hiểu hoạt
Begin
độ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
Clrscr;
13
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
nhóm khác cùng tham gia phân tích.
Writeln(‘Nhap vao so n’); readln(n);
- HS: tham gia hoạt động của giáo viên
Writeln(‘Bang nha’,n);
- GV: yêu cầu học sinh lập bảng hoạt động Writeln;
của chương trình theo mẫu:
For i:=1 to 10 do
Giả sử N=2:
Writeln(n,’x’,i:2,’=’,n*i:3);
Bước i
i<=10 Writeln(n,’.’,i,’=’,n*i)
Readln;
1
1 đúng 2.1=2
End.
- 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ả.
4. CỦNG CỐ
Nhận xét, rút kinh nghiệm tiết thực hành
5. DẶN DỊ HỌC SINH VỀ NHÀ
Về nhà viết chương trình in ra màn hình bảng cửu chương từ 2 đến 9.
TUẦN 22 - TIẾT 44:
BÀI THỰC HÀNH 5: SỬ DỤNG LỆNH LẶP FOR ... DO
I. MỤC TIÊU BÀI HỌC:
* 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
* 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.
* Thái độ:
- Giáo dục HS u thích mơn học.
- Tích cực tham gia xây dựng bài.
- Rèn luyện tinh thần tự giác và ý thức học tập tốt.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
14
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
Kiểm tra bài tập đã cho về nhà.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
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 a) Giới thiệu lệnh gotoxy(), wherex
hành Bang_cuu_chuong Yêu cầu học sinh - Gotoxy(a,b)
quan sát kết quả và nhận xét khoảng cách 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.
giữa các hàng, cột.
- HS: quan sát và đưa ra nhận xét.
- Wherex: cho biết số thứ tự của cột, wherey
- ? Có cách nào để khoảng cách giữa các cho biết số thứ tự của hàng.
* Lưu ý: Phải khai báo thư viện crt trước khi
hàng và các cột tăng lên?
sử dụng hai lệnh trên
- GV: Giới thiệu câu lệnh gotoxy và where.
a) Chỉnh sửa chương trình như sau:
- GV: yêu cầu học sinh mở chương trình Program Bang_cuu_chuong;
Bang_cuu_chương và sửa lại chương trình Uses crt;
Var i, n: integer;
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ả.
Begin
Clrscr;
Writeln(‘Nhap vao so n’); readln(n);
- GV: yêu cầu học sinh quan sát kết quả và Writeln(‘Bang nha’,n);
so sánh với kết quả của chương trinh khi Writeln;
chưa dùng lệnh gotoxy(5, wherey)
For i:=1 to 10 do
- HS: quan sát và nhận xét.
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, a) Câu lệnh for lồng trong for
- For <biến đếm1:= giá trị đầu> to
trị cuối> do
- HS: ghi chép cấu trúc và lĩnh hội
For <biến đếm 2:=giá trị đầu> to
<giá trị cuố> do
- GV: đưa nội dung chương trình bài thực
< câu lệnh>;
hành 3 lên màn hình, yêu cầu học sinh đọc Program Tao_bang;
15
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
chương trình, tìm hiểu hoạt động của chương Uses crt;
Var i,j: byte;
trình.
Begin
- HS: hoạt động theo nhóm, tìm hiểu hoạt Clrscr;
động của chương trinh, đại diện của nhóm
For i:=1 to 9 do
Begin
báo cáo kết quả thảo luận.
For j:=0 to 9 do
- GV: cho chạy chương trình.
Writeln(10*i+j:4);
- HS : quan sát kết quả trên màn hình.
Writeln;
End;
Readln;
End.
4. CỦNG CỐ
Nhận xét rút kinh nghiệm giờ thực hành.
5. 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 đẹp.
TUẦN 23 - TIẾT 45:
BÀI 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC
I. MỤC TIÊU BÀI HỌC:
* 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.
* Kĩ năng:
- Nhận biết được đâu là hoạt động lặp với số lần chưa biêt trước.
* Thái độ:
- Giáo dục HS u thích mơn học.
- Tích cực tham gia xây dựng bài.
- Rèn luyện tinh thần tự giác và ý thức học tập tốt.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
16
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
Viết thuật tốn tính tổng 100 số tự nhiên đầu tiên 1,2,3,…,99,100
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 tốn.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ 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: Hãy lấy ví dụ về bài tốn có sử dụng 1. Các hoạt động lặp với số lần chưa biết
câu lệnh lặp với số lần biết trước?
trước
HS: Suy nghĩ, thảo luận -> trả lời:
Tính tổng các số nguyên từ 1 đến n....
GV: Trình bày cho hs biết trong thực tế có Ví dụ 1:
nhiều hoạt động lặp đi lặp lại với số lần chưa
Một ngày chủ nhật Long quyết định gọi điện
biết trước.
cho Trang cho tới khi có người nhấc máy...
? Hãy lấy ví dụ về hoạt động lặp đi lặp lại
Điều kiện để kết thúc thuật tốn là có người
nhiều lần với số lần chưa biết trước?
nhấc máy.
GV: Trong trường hợp này điều kiện để kết
Ví dụ 2:
thúc hoạt động là gì?
Nếu cộng lần lượt n số tự nhiên đầu tiên (n =
1, 2, 3,...), ta sẽ được các kết quả T1 = 1, T2
GV: Trình bày ví dụ 2 để hs hiểu
= 1 + 2, T3 = 1 + 2 + 3,... tăng dần. Cần cộng
bao nhiêu số tự nhiên đầu tiên để có tổng Tn
GV: Trong trường hợp này để quyết định
nhỏ nhất lớn hơn 1000.
thực hiện phép cộng với số tiếp theo hay
dừng ta cần làm gì?
Trong trường hợp này để quyết định thực
hiện phép cộng với số tiếp theo hay dừng ta
HS: Suy nghĩ, thảo luận -> trả lời:
cần phải kiểm tra tổng đã lớn hơn 1000 hay
chưa.
HS: Suy nghĩ, thảo luận -> trả lời:
Hãy mô tả thuật toán của bài toán trên?
HS: Suy nghĩ, thảo luận -> trả lời:
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.
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 và kết thúc thuật toán.
Việc thực hiện phép cộng ở thuật tốn trên
17
Giáo viên bộ mơn: Ngơ Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
? Việc thực hiện phép cộng ở thuật toán trên được lặp lại với số lần là chưa xác định trước
được lặp lại với số lần là bao nhiêu? và điều và điều kiện để kết thúc S ¿ 1000.
kiện để kết thúc là gì?
GV: Trình bày cho hs biết cấu trúc của câu
lệnh lặp với số lần chưa biết trước.
HS: Chú ý lắng nghe, ghi nhận
GV: Trình bày cho hs biết mọi ngôn ngữ lập Cấu trúc lặp với số lần chưa biết trước
trình đều có câu lệnh để thể hiện cấu trúc lặp
với số lần chưa biết trước.
Hoạt động 2: Ví dụ về lệnh lặp với số lần chưa biết trước
GV: Trình bày cho hs biết cú pháp của câu 2. Ví dụ về lệnh lặp với số lần chưa
lệnh lặp với số lần chưa biết trước trong biết trước
ngôn ngữ Pascal.
- Cú pháp của câu lệnh lặp với số lần
chưa biết trước trong ngôn ngữ Pascal:
HS: Chú ý quan sát, lắng nghe, ghi nhận:
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:
B1: Kiểm tra điều kiện.
B2: Nếu điều kiện sai, câu lệnh bị bỏ qua
và việc thực hiện lệnh lặp kết thúc. Nếu
GV: Trình bày ví dụ.
điều kiện đúng, thực hiện câu lệnh và
quay lại bước 1.
HS: Chú ý lắng nghe, quan sát, ghi nhận.
Ví dụ 3:
1 Viết chương trình tính số n nhỏ nhất để
1
-Chúng ta biết rằng, nếu n càng lớn thì n
n nhỏ hơn một sai số cho trước.
càng nhỏ, nhưng luôn luôn lớn hơn 0. Với
1
1
Uses crt;
giá trị nào của n thì n < 0.005 hoặc n < Var x: real;
n: integer;
0.003 ?
Const sai_so = 0.003;
Begin
18
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
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:6:4,’
la’,n);
GV: -Trình bày cho hs biết nếu chạy
chương trình này thì kết quả n = 334,...
readln;
end.
Ví dụ 4: Hãy dựa vào thuật toán Vd2 viết
- Yêu cầu hs dựa vào thuật tốn viết chương trình tính tổng n số.
chương trình -> lên bảng trình bày.
Suy nghĩ, thảo luận -> lên bảng viết
chương trình.
- Trình bày cho hs biết nếu chạy chương Var s, n: integer;
trình ta sẽ nhận được kết quả n = 45 và Begin
tổng đầu tiên lớn hơn 1000 là 1034.
S:=0; n:=1;
While s<=1000 do
Begin s := s + n; n:= n +1 end;
Writeln(‘So n be nhat de tong > 1000
la:’,n);
Writeln(‘Tong dau tien > 1000 la:’,s);
Readln;
End.
4. CỦNG CỐ
- GV hệ thống lại nội dung chính của tiết học và yêu cầu hs nhắc lại.
- Làm bài tập 3 sgk.
5. DẶN DÒ HỌC SINH VỀ NHÀ
- Học bài
- Nghiên cứu trước nội dung các phần còn lại
TUẦN 23 - TIẾT 46:
BÀI 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC
I. MỤC TIÊU BÀI HỌC:
* Kiến thức:
Biết được các hoạt động lặp với số lần chưa biết trước, biết cú pháp và hoạt động của câu
lệnh lặp với số lần chưa biết trước trong ngơn ngữ lập trình Pascal, biết được lỗi lập trình cần
tránh.
* Kĩ năng:
Vận dụng sự hiểu biết đó vào viết các chương trình máy tính có sử dụng lệnh lặp với số
lần chưa biết trước.
19
Giáo viên bộ môn: Ngô Quốc Vĩnh
Trường THCS Phan Bội Châu
Giáo án Tin học 8
* Thái độ:
- Giáo dục HS u thích mơn học.
- Tích cực tham gia xây dựng bài.
- Rèn luyện tinh thần tự giác và ý thức học tập tốt.
II. CHUẨN BỊ:
- GV: Bảng phụ, câu hỏi.
- HS: Bảng nhóm, bút dạ, phiếu học tập.
III. CÁC BƯỚC LÊN LỚP:
1. Tổ chức ổn định lớp:
2. Kiểm tra bài cũ:
Viết cú pháp và trình bày hoạt động của câu lệnh lặp với số lần không biết trước trong ngơn
ngữ lập trình Pascal.
3. Bài mới:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG
Hoạt động 1: Ví dụ về lệnh lặp với số lần chưa biết trước
Để viết chương trình tính tổng này ta có 2. Ví dụ về lệnh lặp với số lần chưa
thể sử dụng câu lệnh nào?
biết trước (Tiếp)
Suy nghĩ, thảo luận -> trả lời:
Ví dụ 5: Sử dụng ngơn ngữ lập trình
Pascal viết chương trình tính tổng:
1
1
1
Hãy viết chương trình tính tổng trên với
T = 1 + 2 + 3 +...+ 100 .
câu lệnh for ... do.
Ta có thể sử dụng câu lệnh for ... do hoặc
while ... do.
Suy nghĩ, thảo luận, viết chương trình.
Uses crt;
Var T: real; i: byte;
Begin
T:= 0
For i:=1 to 100 do T := T + 1/i;
Writeln(‘Tong la:’,T:6:2);
Readln;
Hãy viết chương trình tính tổng trên với
End.
câu lệnh while ... do.
Suy nghĩ, thảo luận, viết chương trình.
Uses crt;
Var T: real; i: byte;
Begin
T:= 0, i:=1;
While i<= 100 do
Begin
20
Giáo viên bộ môn: Ngô Quốc Vĩnh
