Bài 7: CÂU LỆNH LẶP (tt)
I. Mục tiêu :
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 hung đơn giản.
Hiểu lệnh ghộp trong Pascal
Thái độ nghiêm túc cẩn thận.
II. Chuẩn bị
Gv: Soạn giáo án SGK, SBT
HS: Vở ghi, SGK, SBT, đọc trước nội dung bài học.
III. Hoạt động dạy học
1. Ổn định tổ chức lớp :
- Kiển tra sĩ số :
- Ổn định trật tự :
2. Kiểm tra bài cũ :
Em hãy cho d về hoạt động được thực hiện lặp lại trong cuộc
sống hằng ngày
3. Dạy bài mới :
Hot độ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 biến đơn
kiểu nguyên;
- giá trđầu giá trcuối
các biểu thức c
ùng
kiểu với biến đếm
giá
tr cui phải ln hơn giá
trị đầu;
Ccâu lệnh thlà câu lệnh
đơn giản hay câu lệnh ghép.
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
Vd 1: Chương trình in ra màn
hình thứ tự lần lặp.
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 nhn vị trớ
Cho hs nhận xét và so sánh s
khác nhau ở câu lệnh lập trong
hai ví dụ trên
Gv: Giải thích cho học tại sao
vd2 trong câu lnh lặp cú begin
… end ;
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.
*Lưu ý: Câu lệnh có sử dụng câu
lnh ghộp thì phải đặt trong hai
từ khóa begin … end;
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 pm
(Pascal)
Theo cng 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 ó giá tr
được nhập từ bàn phím?
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
Trong trường hợp dữ liệu có kiểu
nguyên rất lớn ta dùng longint
Hot động 3 : Củng cố:
1/ Cấu trúc lặp trong chương tr
ình
dựng để làm gì ?
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 , vi 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 = ‘);