Giáo án Tin 8 (T37-42)

- 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..do trong pascal.. Bài mới: 35’ Hoạt động của thầy và trò Nội dung ghi bảng Hoạt động 1: Các công việc phải t

Trang 1

Tiết: 37

Câu lệnh lặp

I Mục tiêu:

1 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

- 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 do trong pascal

2 Kỹ năng: Viết đúng đợc lệnh for ….do trong pascal.….do trong pascal.….do trong pascal 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 Ph ơng pháp : - Thuyết trình, chia nhóm nghiên cứu làm bài tập, vấn đáp III chuẩn bị của GV, HS

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

IV Tiến Trình lên lớp:

1

ổ n định lớ (1 )’)

2 Kiểm tra bài cũ (5’))

? Trình bày cấu trúc của câu lệnh rẽ nhánh trong pascal, nêu ý nghĩa hoạt động của câu lệnh?

? Mô tả thuật thoán tính tổng của 100 số tự nhiên đầu tiên?

3 Vào bài mới: (1 ) ’) Để 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 nghi nhàn đầu bài lên bảng

4 Bài mới: (35’))

Hoạt động của thầy và trò Nội dung ghi bảng

Hoạt động 1: Các công việc phải thực hiện nhiều lần (5’))

?Hàng ngày chúng ta thờng phải làm

một số việc lặp đi lặp lại một số lần,

em hãy lấy ví dụ về một số việc hàng

ngày em phải làm

- 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 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à chốt lại

1 Các công việc phải thực hiền nhiều lần

- Công việc không biết trớc số lần lặp lại: học bài cho đến khi thuộc hết các bài,

- Công việc đã biết trớc số lần lặp: đi học mỗi sáng 5 tiết, mỗi ngày tập 7 bài thể dục buổi sáng, đánh răng mỗi ngày 3 lần,

=> Để chỉ 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

VD1: Để tính 5 số tự nhiên đầu tiên ta có thể viết nh sau:

begin I=0; Tong:=0;

I:=i+1; Tong:=Tong+i;

Readln; end

Hoạt động 2: Câu lện lặp - một lệnh thay cho nhiều lệnh (15)

-HS: nghiên cứu ví dụ 1 SGK - 56,57

- GV: phân tích ví dụ 1

- HS: Nghe, nghi chép

- HS: Mô tả lại thuật toán, phân tích

thuật toán

? 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à

2 Câu lện lặp - một lệnh thay cho nhiều lệnh

VD1: Vẽ 3 hình vuông giống nhau

- thuật toán (SGK T56,57) 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)

=> Kết luận: - Cáng mô tả các hoạt động

Trang 2

- GV: Kết luận 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 (15)

- GV: Trình bày cấu trúc vòng lặp

For ….do trong pascal.….do trong pascal to….do trong pascal.….do trong pascal do

….do trong pascal.….do trong pascal.….do trong pascal.….do trong pascal

- 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: Nghe, ghi chép

GV: vận dụng câu lệnh viết vòng lặp

cho ví dụ 1 phần 1

Var i, tong: integer;

Begin

Tong:=0;

For i: = 1 to 5 do

Tong:= tong + i;

Write(‘tong=’),tong);

Readln;

End

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á 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

5 Củng cố (2 ) ’) Giáo viên hệ thống lại toàn bộ nội dung bài học

6 Dặn dò học sinh về nhà (1 ) ’) 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

Trang 3

Ngày dạy: 08/01/2009

Tiết: 38

Câu lệnh lặp

I Mục tiêu:

1 Kiến thức:

- Hiểu cấu trúc câu lệnh ghép

2 Kỹ năng: biết kết hợp câu lệnh ghép và câu lệnh lặp for ….do trong pascal.….do trong pascal.….do trong pascal.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 Ph ơng pháp : - Thuyết trình, chia nhóm nghiên cứu làm bài tập, vấn đáp III chuẩn bị của GV, HS

1

ổ n định lớp (1’))

2 Kiểm tra bài cũ (5’))

? Trình bày cầu trúc của câu lệnh lặp trong pascal, nêu ý nghĩa của các thành phần

trong cấu trúc?

3 Vào bài mới: (1 ) ’) Để vận dụng tốt hơn câu lệnh lặp chúng ta sẽ cùng nghiên cứu bài học ngày hôm nay Giáo viên ghi nhanh tên đề bài lên bảng

4 Bài mới: (35 )’)

Hoạt động 1: Ví dụ về câu lệnh lặp (15’)) -GV: Trình bày cấu trúc của câu lệnh lặp

lùi trong pascal

For ….do trong pascal.….do trong pascal downto….do trong pascal.….do trong pascal.….do trong pascal do

HS: Ghi chép cấu trúc vào vở

GV: Giải thích hoạt động của câu lện

- HS: Đọc và tìm hiểu chơng trình

- HS: một em đứng tại chỗ phân tích hoạt

động của ví dụ

- HS: Các em khác thảo luận và cho ý

kiến

- GV: cho chạy chơng trình mẫu đã gõ

trớc trong máy, yêu cầu học sinh quan

sát kết quả

- GV: Giải thích kết quả của chơng trình

- HS: Đọc và tìm hiểu chơng trình

- HS: một em đứng tại chỗ phân tích hoạt

động của ví dụ

- HS: Các em khác thảo luận và cho ý

kiến

- GV: Trình bày cấu trúc câu lệnh ghép

- HS: Nghe, ghi chép

- GV: cho chạy chơng trình mẫu đã gõ

trớc trong máy, yêu cầu học sinh quan

sát kết quả

- GV: Giải thích kết quả của chơng trình

3 Ví dụ về câu lệnh lặp (tiếp)

- Cấu trúc của câu lệnh lặp lùi:

For<biến đếm>:= <giá trị cuối>downto <giá trị đầu>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 giảm đi1 đơn vị, giảm cho đến khi giá trị của biến đếm nhỏ hơn giá trị đầu 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 trong pascal.do là cấu trúc lặp với số lần lặp biết trớc

- Ví dụ 3 (SGK-58) in ra màn hình thứ

tự lần lặp

Var i: integer; Begin

For i:=1 to 10 do Writeln(‘day la lan lap thu’), i);

Readln;

End

- VD4 (SGK-58) Viết chơng trình đa ra màn hình những chữ “0” theo hình trứng rơi

Uses crt;

Var i: integer; Begin

Clrscr;

For i:=1 to 10 do

begin

Trang 4

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 (20)

- GV: Đa đề bài lên bảng

- HS: 1 em lên bảng làm vd5, 1 em lên

làm vd6.(mô tả thuật toán) (5’))

ở dới lớp cá cem làm bài theo nhóm, mỗi

dãy làm một bài, dãy giữa làm vd5

- HS: Đại diện của mỗi dãy nhận xét

thuật toán trên bảng

-GV: Giúp HS sửa lại đúng thuật toán

-HS: 2 em lên bảng viết chơng trình cho

2 bài (5’))

- HS: ở dới hoạt động theo nhóm, chia

dãy nh ban đầu

- HS: đại diện mỗi dãy nhận xét bài viết

trên bảng

GV: Giúp học sinh sửa chơng trình cho

đúng và chạy chơng trình trên máy

- HS: Quan sát kết quả

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

(Chơng trình SGK)

Ví dụ 6 Tính day tha của N số tự nhiên

đầu tiên

(Chơng trình SGK)

5 Củng cố (2 )’)

HS đọc ghi nhớ SGK, giáo viên tổng kết đánh giá buổi học.

6 Dặn dò học sinh về nhà (1 ) V’) ề nhà làm bài tập trang 60-61

Trang 5

Ngày dạy: 13/01/2009

Tiết: 39

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 biết trớc và câu lệnh ghép

2 Kỹ năng: Vận dụng vòng lặp for ….do trong pascal.….do trong pascal ….do trong pascal.….do trong pascal to do và câu lệnh ghép viết một số bài toán đơn giản

II Ph ơng pháp : chia nhóm nghiên cứu làm bài tập, vấn đáp.

III chuẩn bị của GV, HS

1

ổ n định lớp (1 )’)

? Sử dụng vòng lặp for ….do trong pascal do viết chơng trình tính tổng của 10 số tự nhiên đầu tiên?

3 Vào bài mới (1’))

4 Bài mới: (35’))

Hoạt động 1: Bài tập dạng lí thuyết (10’)) 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 kết quả cuối cùng

- GV: Đa bài tập 2 lên bảng, yêu cầu

một học sinh đứng tại chỗ trả lời

- HS: Một học sinh đứng tại chỗ trả lời

bài tập 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

Bài 1: SGK (T60)

Bài 2: SGK (T60)

- Câu lệnh lặp có tác dụng chỉ dẫn cho máy tính thực hiện lặp lại một câu lệnh hay một nhóm câu lệnh với một số lần nhất định

- 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 trong pascal 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

Trang 6

Hoạt động 2: Bài tập dạng thực hành (25’))

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

5 Củng cố (2 ) ’) Giáo viên nhận xét tiết học, rút kinh nghiệm tiết học

6 Dặn dò học sinh về nhà (1 ) về ’) nhà viết chơng trình pascal bài 6 SGK (T61)

Trang 7

Ngày dạy: 13/01/2009

Tiết: 40

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 biết trớc và câu lệnh ghép

2 Kỹ năng: Vận dụng vòng lặp for ….do trong pascal.….do trong pascal ….do trong pascal.….do trong pascal to do và câu lệnh ghép viết một số bài toán đơn giản

1

ổ n định lớp (1’))

? Một em lên bảng viết chơng trình pascal cho bài 6 SGK (T61)

3 Vào bài mới:

4 Bài mới:

Hoạt động 1:Bài tập vận dụng

- Giáo viên đa ra nội dung bài tập,

- HS phân tích bài toán tìm hớng

giải quyết

- Gv: hớng dẫn học sinh cách làm

và viết chơng trình lên bảng và

yêu cầu học sinh đọc hiểu

- HS: đọc lại chơng trình giáo viên

đã viết trên bảng và tìm hiểu từng

câu lệnh

- GV: yêu cầu một học sinh đứng

tại vị trí diễn tả tuần tự ý nghĩa

của chơng trình thông qua diễn tả

công việc của từng lệnh trong

ch-ơng trình

- GV: diễn tả lại một lần để học

sinh hiểu sâu hơn về chơng trình

Bài tập 1: Nhập vào n số nguyên từ bàn

phím, tìm số lớn nhất trong dãy số vừa nhập

Program tim_max;

Uses crt;

Var i, n, smax, A : integer;

Begin Clrscr;

Writeln(‘nhap vao n’)); readln(n);

Smax:=-23768;

For i:= 1 to n do Begin

Writeln(‘nhap vao so thu ’),i); readln(A);

If smax<A then smax:=A;

End;

Writeln(‘so lon nhat la’),A); readln

Trang 8

- Giáo viên đa ra nội dung bài tập,

- HS phân tích bài toán tìm hớng

giải quyết

- GV: Đa ra công thức tính day

thừa:

day thừa = 1*2*3*4*5*….do trong pascal *n

- HS: dựa vào bài tập 1 viết chơng

trình cho bài toán (viết theo

nhóm)

- Đại diện của nhóm đứng lên bảng

trình bày kết quả Các nhóm khác

nhận xét, rút kinh nghiệm

- GV: Kết luận kết quả cuối cùng

- Yêu cầu một học sinh lên máy

chính gõ chơng trình vào máy, cả

lớp sửa lỗi nếu có, cho chơng

trình chạy thử, học sinh quan sát

kết quả

- HS: chép lại chơng trình đã chạy

vào vởi

End

Bài tập 2: Viết chơng trình tính day

thừa của n số tự nhiên đầu tiên

Program tinh_day_thua;

Uses crt;

Var i, n : integer; kq: longint;

Begin Clrscr;

Writeln(‘nhap vao n’)); readln(n);

Kq:=1;

For i:= 1 to n do Kq:=kq*i;

Writeln(‘ket qua la’),kq); readln End

5 Củng cố (2 ) ’) Nhấn mạnh ý nghĩa và công dụng, cách sử dụng vòng lặp for ….do trong pascal do Nhận xét, rut kinh nghiệm buổi học

6 Dặn dò học sinh về nhà (1 )’)

- Học sinh về nhà làm bài tập:

1 tính tổng của n số tự nhiên đầu tiên

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

Trang 9

Ngày dạy: 20/01/2009

Tiết: 41

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 trong pascal 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 trong pascal 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 trong pascal 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.

1

ổ n định lớp (1’))

2 Kiểm tra bài cũ (5’)) Kiểm tra bài tập đã cho về nhà.

3 Vào bài mới: (1’)) Chúng ta đã nghiên cứu lý thuyết về vòng lặp for ….do trong pascal 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

4 Bài mới: (35’))

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

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

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);

Trang 10

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)

- 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 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ả

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

5 Củng cố (2 ) ’) Nhận xét, rút kinh nghiệm tiết thực hành

6 Dặn dò học sinh về nhà (1 ) ’) 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

Ngày dạy: 20/01/2009

Tiết: 42

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 trong pascal 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 trong pascal 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 trong pascal do

Tiêu đề	Câu lệnh lặp
Người hướng dẫn	Giáo viên: Nguyễn Thị Thanh Nga
Trường học	Trường THCS Bình Dương
Chuyên ngành	Tin học
Thể loại	Giáo án
Năm xuất bản	2009
Thành phố	Bình Dương

Định dạng
Số trang	12
Dung lượng	114 KB