Để chỉ dẫn cho máy tính thực hiện đúng công việc, trong nhiều trường hợp ta cũng cần phải viết lặp lại nhiều câu lệnh thực hiện một phép tính nhất định.... .[r]
(1)Bài 7
Câu lệnh lặp
(2)w
w
w
.th
em
eg
al
le
ry
.c
om
(3)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
(4)w
w
w
.th
em
eg
al
le
ry
.c
om
1 Các công việc phải thực nhiều lần: Câu lệnh lặp
Tuần 27 Tiết 53 Bài
Mỗi ngày xem tivi lần vào buổi tối công việc lặp lại với số lần định biết trước
Mỗi ngày chơi thể thao lần vào buổi sáng công việc lặp lại với số lần định biết trước
Mỗi buổi học em phát biểu lần công việc lặp lại với số trước
(5)w
w
w
.th
em
eg
al
le
ry
.c
om
2 Câu lệnh lặp - lệnh thay cho nhiều lệnh:
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
2
1
Ví dụ 1: Vẽ hình vng có cạnh đơn vị
Thuật tốn
Bước 1: Vẽ hình vuông (vẽ liên tiếp bốn cạnh trở
đỉnh ban đầu)
Bước 2: Nếu số hình vng vẽ 3, di chuyển
(6)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
2 Câu lệnh lặp - lệnh thay cho nhiều lệnh:
Bài toán vẽ hình vng
Thuật tốn:
Bước 1: k (k số đoạn thẳng vẽ được)
Bước 2: k k+1 Vẽ đoạn thẳng đơn vị độ dài quay
thước 900 sang phải
Bước 3: Nếu k < trở lại bước 2; Ngược lại, kết thúc
thuật toán
(7)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
2 Câu lệnh lặp - lệnh thay cho nhiều lệnh:
Ví dụ 2: Tính tổng 100 số tự nhiên S=1+2+…+100
Bước 1: Sum 0; i
Bước 2: i i +
Bước 3: Nếu i 100, Sum Sum + i quay lại bước
Bước 4: Thông báo kết kết thúc thuật toán
- Cách mơ tả hoạt động lặp thuật tốn ví dụ gọi cấu trúc lặp
(8)w
w
w
.th
em
eg
al
le
ry
.c
om
3 Ví dụ câu lệnh lặp: Câu lệnh lặp
Tuần 27 Tiết 53 Bài
Hãy nêu cấu trúc dạng lặp tiến ?
For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>;
Trong đó:
- For, to, từ khóa
- Biến đếm biến kiểu nguyên
- Giá trị đầu, giá trị cuối giá trị nguyên
Lưu ý:
- Giá trị đầu phải nhỏ giá trị cuối
- Câu lệnh không làm thay đổi giá trị biến đếm
- Nếu câu lệnh nhiều lệnh phải đặt cặp
(9)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
3 Ví dụ câu lệnh lặp:
Ví dụ 3: Chương tình sau in hình thứ tự lần lặp
Program Lap; Var i:Integer; Begin
For i:=1 to 10 do
Writeln(‘ Day la lan lap thu ‘,i); Readln;
(10)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
3 Ví dụ câu lệnh lặp:
Ví dụ 4: In chữ “O” hình
Uses crt;
Var i:Integer; Begin
Clrscr;
For i:=1 to 20 do Begin
Writeln(‘O’); Delay(100); End;
(11)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
…
Begin
Writeln(‘O’); Delay(100); End;
…
…
Writeln(‘O’);
…
Câu lệnh đơn Câu lệnh ghép
(12)w
w
w
.th
em
eg
al
le
ry
.c
om
4 Tính tổng tích câu lệnh lặp: Câu lệnh lặp
Tuần 27 Tiết 53 Bài
Ví dụ 5: Tính tổng N số
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 dau tien la ‘,S); Readln;
(13)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
4 Tính tổng tích câu lệnh lặp: Ví dụ 6: Tính tích N số tự nhiên
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;
(14)w
w
w
.th
em
eg
al
le
ry
.c
om
Câu lệnh lặp
Tuần 27 Tiết 53 Bài
GHI NHỚ:
1 Cấu trúc lặp sử dụng để thị cho máy tính thực lặp lại vài hoạt động điều kiện thỏa mãn
2 Mọi ngơn ngữ lập trình có câu lệnh lặp để thể cấu trúc lặp
(15)w
w
w
.th
em
eg
al
le
ry
.c
om
CỦNG CỐ
Câu 1: Hãy ghi cấu trúc câu lệnh lặp tiến ? Cho ví dụ ? Câu 2: Cấu trúc lặp sau ?
(16)w
w
w
.th
em
eg
al
le
ry
.c
om
DẶN DÒ - Về nhà học này.
- Trả lời câu hỏi tập trang 60 SGK.
(17)