Bài 7. Câu lệnh lặp

Kiểm tra bài cũ:
Hãy viết chương trình xuất ra 12 câu:
Day la thang 1
Day la thang 2
Day la thang 3
Day la thang 4
Day la thang 5
Day la thang 6
Day la thang 7
Day la thang 8
Day la thang 9
Day la thang 10
Day la thang 11
Day la thang 12
Đây chính là kết quả
Có cách nào viết gọn lại được không ?
1. Các công việc phải thực hiện nhiều lần:
Đánh răng mỗi ngày hai lần.
Mỗi ngày tắm một lần
.
Học cho đến khi thuộc bài
Nhặt từng cọng rau cho đến khi xong.
..
CÂU LỆNH LẶP
?
2. Câu lệnh lặp - một lệnh thay cho nhiều lệnh.
1. Các công việc phải thực hiện nhiều lần:
CÂU LỆNH LẶP
Bài 7
Ví dụ 1: Vẽ hình vuông có cạnh 1 đơn vị.
Bước 1: d ? 0 (d là số đoạn thẳng đã vẽ được)
Bước 2: d ? d + 1. Vẽ đoạn thẳng 1 đơn vị độ dài và quay thước 900 sang phải.
Bước 3: Nếu d < 4 thì trở lại bước 2. Ngược lại kết thúc thuật toán.
?
?
2. Câu lệnh lặp - một lệnh thay cho nhiều lệnh.
1. Các công việc phải thực hiện nhiều lần:
CÂU LỆNH LẶP
Bài 7
Ví dụ 2: Tính S = 1+ 2 + 3 + 4 + .. + 100
Bước 1: S ? 0; i ? 0.
Bước 2: i ? i + 1
Bước 3: Nếu i <= 100, thì S ? S + i
và quay lại bước 2.
Bước 4: Thông báo kết quả và kết thúc thuật toán.
?
FOR biến đếm : = giá trị đầu TO giá trị cuối DO Câu lệnh trong vòng lặp ;
Từ khoá
CÂU LỆNH LẶP
Bài 7
FOR biến đếm : = giá trị đầu TO giá trị cuối DO Câu lệnh trong vòng lặp ;
Phải thuộc kiểu
số nguyên
Giá trị đầu Giá trị cuối
2. Câu lệnh lặp - một lệnh thay cho nhiều lệnh:
1. Các công việc phải thực hiện nhiều lần:
CÂU LỆNH LẶP
Bài 7
3. Ví dụ về câu lệnh lặp:
For : = to do ;
- For, to, do: là từ khóa
- Biến đếm, giá trị đầu, giá trị cuối : Kiểu số nguyên
- Nếu có nhiều hơn một lệnh thì phải đặt trong cặp từ khoá Begin ... end;
Sau do không có dấu chấm phẩy
- Có thể dùng các vòng lặp For lồng nhau
?
Sử dụng:
For …To ….Do ….
Để viết viết lại chương trình này.
Đầu vào:
+ Biến đếm i chạy từ 1  12
+ giá trị đầu: 1
+ giá trị cuối: 12
- Đầu ra: Xuất ra các tháng trong năm.
1 d
Quan sát kết quả !
1<=12
i := 1
Đây là tháng 1
i<= 12
i := i+1 = 2
[ Bắt đầu ]
[Kết thúc]
ĐÚNG
ĐÚNG
SAI
SAI
Đây là tháng 2
i := i+1 = 3
Đây là tháng 3
[Kết thúc]
LẶP
1<=12
i := 11
Đây là tháng 11
i<= 12
i := i+1 = 12
[ Bắt đầu ]
[Kết thúc]
ĐÚNG
ĐÚNG
SAI
SAI
Đây là tháng 12
i := i+1 = 13
[ Kết thúc]
LẶP
Ví dụ 3:
Program Lap;
Var i: integer;
Begin
For i: = 1 to 10 do
Writeln (` Day la lan lap thu `,i);
Readln;
End.
Biến đếm?
giá trị đầu?
giá trị cuối?
Xuất ra màn hình bao nhiêu câu ?
Biến đếm: i
giá trị đầu: 1
giá trị cuối: 10
Xuất ra màn hình: (10 - 1) + 1 = 10 câu
BÀI TẬP VỀ NHÀ:
Viết chương trình tính tổng
1 + 2 + 3 + … + 100
CHÚC CÁC EM
HỌC TỐT !!!
Ví dụ 4:
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 1 + 2 + 3 + .+ n
n nhập vào từ bàn phím.
Ví dụ 6: Tính n! = 1.2.3...n