Giáo án tin học lớp 8 - Bài 7: CÂU LỆNH LẶP (tt) ppt

Giáo án tin học lớp 8
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
huống đơ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 ví 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 :
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
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.
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;
Ccâ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

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
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
lệnh lặp cú begin … end ;

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 lệnh 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
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
ó 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
Hoạt động 3 : Củng cố:
1/ Cấu trúc lặp trong
chương trình dựng để
S:= S+i;
writeln(‘Tong cua’,
N, ‘so tư
nhien dau tien S = ‘,
S);
readln;
end.
*Kiểu longint cú phạm vi
từ -2
31
đến 2
31
– 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;
làm gì ?
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?


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.