PHÒNG GIÁO DỤC HUYỆN CẨM MỸ
TRƯỜNG THCS TRẦN PHÚ
BÀI 7:
CÂU LỆNH LẶP
TIN HỌC 8
GV: Dương
Quang Tùng
1
2
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Hoạt động hình thành kiến thức:
1.Cú pháp câu lệnh lăp có dạng?
2.Trong đó:
•
•
•
•
For, to, do:
Biến đếm:
Giá trị đầu, giá trị cuối
Câu lệnh:
3.Số lần lặp = ?
4
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
a/ Cú pháp:
Biến kiểu nguyên
Giá trị nguyên
Câu lệnh lặp với số lần biết trước trong Ngơn ngữ lập
trình Pascal có dạng? . . .
FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO < câu lệnh>;
Từ khoá
Câu lệnh đơn hoặc
câu lệnh ghép
5
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
a/ Cú pháp:
FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO < câu lệnh>;
b/ Trong đó:
• For, to, do là từ khóa
• Biến đếm: biến kiểu nguyên
• Giá trị đầu, giá trị cuối là biểu thức cùng kiểu với biến đếm
(giá trị đầu <= giá trị cuối)
• Câu lệnh: Khơng được làm thay đổi giá trị biến đếm, Nếu có
nhiều hơn một lệnh thì phải đặt trong cặp từ khoá Begin ...
end;
6
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
a/ Cú pháp:
FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO < câu lệnh>;
b/ Trong đó:
c/ Hoạt động của câu lệnh:
d/ Lưu ý: Số lần lặp = giá trị cuối - Giá trị đầu + 1
7
Tiết 30
BÀI 7: CÂU LỆNH LẶP
i lặp: Kết quả viết ra màn hình
3.Lần
Ví lặp
dụ thứ
về câu lệnh
1
1 sẽ
lan thứ
lap
1 lặp:
Ví
trình
màn
tự
Ví dụ
dụ 3:
3: Chương
Chương
trình sau
sau
sẽ in
in ra
ra Day
mànlahình
hình
thứthu
tự lần
lần
lặp:
2
2
Day la lan lap thu 2
day la lan lap thu 1
Program 3lap;
3
Day la lan day
laplathu
lan 3lap thu 2
day la lan lap thu 3
Uses crt;
4
4
Day la lan day
laplathu
lan 4lap thu 4
Var i: integer;
day la lan lap thu 5
5
5
Day
la
lan
lap
thu
5
Begin
day la lan lap thu 6
lan 6lap thu 7
6 1 to 10 do 6
Day la lan day
laplathu
For i:=
day la lan lap thu 8
Writeln
(‘day la lan
i ); la lan day
7
7 lap thu ’,Day
laplathu
lan 7lap thu 9
day la lan lap thu 10
Readln;
8
8
Day la lan lap thu 8
end.
9 màn
la lan
Theo em9dự đốn
Số thì
lầntrên
lặp=
?10-1+1=10(lần)
hìnhDay
sẽ hiển
thịlap
lênthu
kết9 8
10 khi chạy chương
Day la lan
lap thu 10
quả10
như thế nào sau
trình?
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Ví dụ 3: Chương trình sau sẽ in ra màn hình thứ tự lần lặp:
day la lan lap thu 1
day la lan lap thu 2
day la lan lap thu 3
day la lan lap thu 4
day la lan lap thu 5
day la lan lap thu 6
day la lan lap thu 7
day la lan lap thu 8
day la lan lap thu 9
day la lan lap thu 10
Program lap;
Uses crt;
Var i: integer;
Begin
For i:= 1 to 10 do
Writeln (‘day la lan lap thu ’, i );
Readln;
end.
Theo em dự đốn
Số thì
lầntrên
lặp=màn
?10-1+1=10(lần)
hình sẽ hiển thị lên kết
quả như thế nào sau khi chạy chương trình?
9
Vd 3: Chương trình in ra màn hình thứ tự lần lặp:
Program Lap;
Uses crt;
Var i: integer;
Begin
for i:=1 to 10 do
writeln(‘Day la lan lap thu ‘, i);
Readln;
End.
Day la lan lap thu 1
Day la lan lap thu 2
Day la lan lap thu 3
Day la lan lap thu 4
Day la lan lap thu 5
Day la lan lap thu 6
Day la lan lap thu 7
Day la lan lap thu 8
Day la lan lap thu 9
Day la lan lap thu 10
i:=8
i:=9
i:=2
i:=1 đầu >
i:=4
i:=3
i:=7
i:=6
Biến:=
i:=11
i:=10
i:=5
Sai
87
11
4
9
<=
<=
<=
10
10
10
6
5
1
3
2<=
<=
10
Biến
10
<=GT
10cuối
Đúng
Câu lệnh
Biến tự động tăng 1 đơn vị
End.
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Áp dụng:
Hãy viết chương trình in ra màn hình các số từ 1 đến 10
Program lap;
Uses crt;
Var i: integer;
Begin
For i:= 1 to 10 do
Writeln (‘day la lan lap thu ’, i );
Readln;
end.
day la lan1 lap thu 1
day la lan2 lap thu 2
day la lan3 lap thu 3
day la lan4 lap thu 4
day la lan5 lap thu 5
day la lan6 lap thu 6
day la lan7 lap thu 7
day la lan8 lap thu 8
day la lan9 lap thu 9
day la lan10lap thu 10
11
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Áp dụng:
Hãy viết chương trình in ra màn hình các số từ 1 đến 10
Program lap;
Uses crt;
Var i: integer;
Begin
For i:= 1 to 10 do
Writeln ( i );
Readln;
end.
1
2
3
4
5
6
7
8
9
10
12
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Để in một chữ “O” trên màn hình ta sử dụng lệnh nào?
Để in nhiều chữ “O” trên màn hình ta làm như thế nào?
For i:= 1 to 20 do Writeln (‘O’);
13
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Ví dụ 4:
Đọc hiểu chương trình
Uses crt;
Var i: integer;
Begin
For i:= 1 to 20 do Writeln (‘o’);
Readln
end.
Uses crt;
Var i: integer;
Begin
For i:= 1 to 20 do
begin
Writeln (‘o’);
delay(100)
end;
Readln
end.
14
Tiết 30
BÀI 7: CÂU LỆNH LẶP
3. Ví dụ về câu lệnh lặp:
Ví dụ 4: Hiệu ứng trứng rơi
Uses crt;
Var i: integer;
Begin
For i:= 1 to 20 do
begin
Writeln (‘o’);
delay(100)
end;
Readln
end.
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
15
Củng cố
Bài 4 (SGK-61) Sau khi thực hiện đoạn
chương trình sau, giá trị j bằng bao nhiêu?
j:=0;
For i:=0 to 5 do j:=j+2;
Số lần lặp = 5 – 0 + 1 = 6 (Lần)
Sau mỗi vòng lặp giá trị j tăng thêm 2
Sau 6 vòng lặp giá trị j = 12
16
Nhận biết câu lệnh lặp
câu lệnh
lệnhPascal
Pascalsau
sauđây
Bài 5 (SGK-61) Các câu
đâyhợp
có lệ
hợp
hay khơng,
vì sao?
có
haylệkhơng,
vì sao?
a/ For
For i:=100
i:=100 to
to11do
dowriteln(‘A’);
writeln(‘A’);
For i:=1.5
i:=1.5to
to10.5
10.5do
dowriteln(‘A’);
writeln(‘A’);
b/ For
For i=1
i=1 to
to10
10do
dowriteln(‘A’);
writeln(‘A’);
c/ For
For i:=1
i:=1to
to10
10do;
do;writeln(‘A’);
writeln(‘A’);
d/ For
x:Real;
e/ Var x:Real;
Begin
Begin
For x:=1
x:=1 to
to10
10do
dowriteln(‘A’);
writeln(‘A’);
For
End.
End.
17
Bài tập nhóm
Sau khi thực hiện đoạn chương trình
sau giá trị của A, B bằng bao nhiêu:
Câu 1
A:=0; B:=1;
For i:=1 to 5 do A:=A+1; B:=B+1
Câu 2
A:=0; B:=1;
For i:=1 to 5 do
Begin A:=A+1; B:=B+1; End;
Nhóm 1,2
Nhóm 3, 4
1 phút
2
3
Hết
Thời
thờigian
gian 58
13
16
15
18
31
33
36
35
38
51
53
56
55
10
09
08
07
06
05
04
03
02
01
12
14
17
30
29
28
27
26
25
24
23
22
21
20
19
32
34
37
50
49
48
47
46
45
44
43
42
41
40
39
52
54
57
00
60
59
11
18
Ghi nhớ
1. Cấu trúc lặp được sử dụng để chỉ
thị cho máy tính thực hiện lặp lại một
vài hoạt động nào đó cho đến khi một
điều kiện nào đó được thoả mãn.
2. Mọi ngơn ngữ lập trình đều có các
câu lệnh lặp để thể hiện cấu trúc lặp.
3. Ngôn ngữ Pascal thể hiện cấu trúc
lặp với số lần lặp cho trước bằng câu
lệnh For … do
19
Củng cố
20
- Học bài cũ
- Làm các bài tập còn lại trong phần câu hỏi và
bài tập trang 60,61(sgk)
- Xem trước: Phần 4 – Bài 7
21
The End.