Hớng dẫn về nhà:

- Học bài, xem lại bài và lấy thêm các ví dụ

- Chuẩn bị bài học cho tiết sau (học tiếp bài câu lệnh lặp)

Ngày soạn : 25/12/2008 Ngày dạy :

Tuần 19 : Tiết 37:

Bài 7: câu lệnh lặp

A. Mục tiêu :

•Biết nhu cầu cần cú cấu trỳc 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 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.

•Hiểu lệnh ghộp trong Pascal •Thỏi độ nghiờm tỳc cẩn thận.

B. Chuẩn bị :

1. Giáo viên : - SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học... - Đồ dùng dạy học...

2. Học sinh : - Đọc trớc bài

- SGK, Đồ dùng học tập...

C. Tiến trình tiết dạy : I. ổn định tổ chức lớp :

- Kiển tra sĩ số :

8A : ……. 8B :……. 8C :…….. 8D :…………. 8E :…………

- ổn định trật tự :

II. Kiểm tra bài cũ :

HS 1 :Nêu các cơng việc phải thực hiện nhiều lần, nêu vd

III. Dạy bài mới :

hoạt động của thày và trị kiến thức cần đạt

Hoạt động 1 : Ví dụ về câu lệnh lặp

Gv: minh họa bẳng ngụn ngữ Pascal cỳ phỏp cõu lệnh for … to … do

•Lưu ý cho hs:

- biến đếm là biến đơn

cú kiểu nguyờn;

- giỏ trị đầu và giỏ trị cuối là cỏc biểu thức

cú cựng kiểu với biến

đếm và 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 giản hay cõu lệnh ghộp.

Cho hs nhận xột và so sỏnh sự khỏc nhau ở cõu lệnh lặp trong hai vd trờn?

Gv: Giải thớch cho học tại sao vd2 trong cõu lệnh lặp cú begin … end

Cỳ Phỏp cõu lệnh lặp với số lần biết trước trong Pascal.

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ừ khúa

+ biến đếm là biến đơn cú kiểu nguyờn

+ giỏ trị đầu và giỏ trị cuối là cỏc biểu thức cú cựng kiểu với biến đếm và 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 giản hay cõu lệnh ghộp Vd 1: Chuong trỡnh in ra màn hỡnh thứ tự lần lặp. Program lap; var i:integer; begin for i:= 1 to 20 do

writeln(‘Day la lan lap thu’,i); readln;

end.

Vd2: chương trỡnh ghi nhận vị trớ 10 chữ O rơi từ trờn xuống. ues crt; var i:integer; begin clrscr; for i:= 1 to 20 do begin writeln(‘O’); delay(200);

end; readln; end.

(Delay (200)là hàm khai báo thời gian rơI nhanh hay chậm của chữ O)

*Lưu ý: Cõu lệnh đơn giản Writeln(‘O’) và

Delay(200) đợc đặt trong từ khố BEGIN và AND để tạo thành câu lệnh ghép trong PASCAL

Hoạt động 2 : Tính tổng và tích bằng câu lệnh lặp

Gv: trỡnh bày đoạn chương trỡnh tớnh tổng N số tự nhiờn, với N là số tự nhiờn được nhập từ bàn phớm (Pascal)

Theo cụng thức tớnh tổng ta cần khai bao nhieu biến? kiểu biến? Trong 2 biến thỡ biến nào cú giỏ trị được nhập từ bàn phớm?

Gv: Mụ tả thuật toỏn tớnh tổng cỏc số tự nhiờn từ 1→ 100

Vd 1: chương trỡnh tớnh tổng N số tự nhiờn đầu tiờn, với N là số tự nhiờn được nhập từ bàn phớm. S = 1+2+3+ … + N program Tinh_tong; var N,i:integer; S:longint; begin write(‘Nhap so N = ‘); readln(N); S:= 0; for i:= 1 to N do S:= S+i;

writeln(‘Tong cua’, N, ‘so tư nhien dau tien S = ‘, S); readln;

end.

*Kiểu longint cú phạm vi từ -231 đến 231 – 1. Vd 2: chương trỡnh tớnh tớch N số tự nhiờn, với N là số tự nhiờn được nhập từ bàn phớm. N! = 1.2.3….N program Tinh_Giai_Thua; var N,i:integer; P:longint; begin write(‘Nhap so N = ‘); readln(N); P:= 1; for i:= 1 to N do P:= P*i; writeln( N, ‘! = ‘, P); readln; end. IV: Củng cố kiến thức:

2/ Trong ngụn ngữ lập trỡnh Pascal cấu trỳc lặp với số lần lặp cho trước được thể hiện với cõu lệnh nào?

V: Hớng dẫn về nhà: