Bài 7: Câu lệnh lặp
Tin Học 8
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 là công việc lặp lại với số lần nhất định và biết trước.
Mỗi ngày tắm một lần là công việc lặp lại với số lần nhất định và biết trước.
Đi học mỗi ngày một lần là công việc lặp lại với số lần nhất định và biết trước.
Học cho đến khi thuộc bài là công việc lặp lại với số lần không thể xác định được.
Bài 7: Câu lệnh lặp
Trong cuộc sống hằng ngày, nhiều hoạt động được lặp đi lặp lại nhiều lần.
Có những hoạt động mà chúng ta thường thực hiện lặp lại với một số lần nhất định và biết trước, chẳng hạn đánh răng mỗi ngày hai lần, mỗi ngày tắm một lần,…Chúng ta còn lặp lại công việc với số lần không thể xác định được: học cho đến khi thuộc bài,nhặt từng cọng rau cho đến khi xong,…
Khi viết chương trình máy tính cũng vậy. Để chỉ dẫn cho máy 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.
Bài 7: Câu lệnh lặp
1. Các công việc phải thực hiện nhiều lần
Hình 33
Bài 7: Câu lệnh lặp
2. Câu lệnh lặp-một lệnh thay cho nhiều lệnh
Ví dụ 1. Giả sử ta cần vẽ ba hình vuông có cạnh 1 đơn vị như hình 33. Mỗi hình vuông là ảnh dịch chuyển của hình bên trái nó một khoảng cách 2 đơn vị. Do đó, ta chỉ cần lặp lại thao tác vẽ hình vuông ba lần.
Việc vẽ hình có thể thực hiện được bằng thuật toán sau đây:

Bước 1. Vẽ hình vuông ( vẽ liên tiếp bốn cạnh và trở về đỉnh ban đầu).
Bước 2. Nếu số hình vuông đã vẻ được ít hơn 3, di chuyển bút vẻ về bên phải hai đơn vị và trở lại bước 1; ngược lại kết thúc thuật toán.
1
2
2
Bài 7: Câu lệnh lặp
2. Câu lệnh lặp-một lệnh thay cho nhiều lệnh
.....
Hình 34
Bài 7: Câu lệnh lặp
2. Câu lệnh lặp-một lệnh thay cho nhiều lệnh
Riêng bài toán vẽ một hình vuông (hình 34), thao tác chính là vẽ bốn cạnh bằng nhau, hãy lập lại bốn lần thao tác vẽ một đoạn thẳng. Sau mỗi lần vẽ đoạn thẳng, thước kẻ được quay một góc 90 sang phải tại vị trí của bút vẽ.
Thuật toán sau đây sẽ mô tả các bước để vẽ hình vuông:
Bài 7: Câu lệnh lặp
2. Câu lệnh lặp-một lệnh thay cho nhiều lệnh
Thuật toán sau đây sẽ mô tả việc thực hiện lặp lại phép cộng 100
lần:
Bài 7: Câu lệnh lặp
2. Câu lệnh lặp-một lệnh thay cho nhiều lệnh
Ví dụ 2. Giả sử cần tính tổng của 100 số tự nhiên đầu tiên, tức là tính:
S= 1+2+3+…+100.
Biến đếm: biến kiểu nguyên, kí tự
Giá trị đầu, giá trị cuối là biểu thức cùng kiểu với biến đếm.
Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối.
For := to do ;
Ví dụ S:=1;
FOR i:=2 TO 100 DO S:=S+1/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;
3.Cấu trúc lặp tiến
Hãy nêu cấu trúc dạng lặp tiến?
Bài 7: Câu lệnh lặp
Quan sát sơ đồ khối, hãy cho biết sự thực hiện của máy?
Bước 1: tính giá trị đầu, gán cho biến đếm.
Bước 2: Nếu biến đếm <= giá trị cuối thì:
thực hiện lệnh cần lặp.
tăng biến đếm 1 đơn vị, quay lại bước 2
3.Cấu trúc lặp tiến
Bài 7: Câu lệnh 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.
3.Cấu trúc lặp tiến
Bài 7: Câu lệnh lặp
Chương trình sau sẽ in ra màn hình số lần lặp
Program lap;
Uses crt;
Var i: integer;
Begin
For i:= 1 to 20 do
begin
Writeln (‘O’);
delay(100)
end;
Readln
end.
Để in một chữ “O” trên màn hình, ta có thể sử dụng lệnh
3.Cấu trúc lặp tiến
Bài 7: Câu lệnh lặp
Program Tinh_tong;
Uses crt;
Var i: integer;
S: longint;
Begin
S:=0;
For i:= 1 to 5 do S:= S + 1;
Writeln (‘Tong cua S = ’,s);
Readln
end.
Bài 7: Câu lệnh lặp
4. Các ví dụ tính tổng và tích
Viết chương trình tính tổng S=1+2+3+4+5
Program Tinh_tong;
Uses crt;
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 S = ’,N,’ So tu nhien dau tien S = ‘,S);
Readln
end.
Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số
tự nhiên được nhập vào từ bàn phím
Bài 7: Câu lệnh lặp
4. Các ví dụ tính tổng và tích
Program Tính_Giai_thua;
Uses crt;
Var i, N: integer;
P: longint;
Begin
write (‘Nhap N = ‘); readln (N);
P:= 1;
For i:= 1 to N do P:= P*i;
Writeln (N,’! = ’,P);
Readln
end.
Bài 7: Câu lệnh lặp
4. Các ví dụ tính tổng và tích
Ta kí hiệu N! là tích N số tự nhiên đầu tiên:
N! = 1.2.3…N
- Viết chương trình tính N! với N là số tự nhiên được nhập vào từ bàn phím.
Program tinh_tong;
Uses crt;
Var m, n, i: integer;
S: longint;
Begin
write (‘Nhap n = ‘); readln ( n);
write (‘Nhap m=‘); readln ( m);
S:=0;
For i:= n to m do S:= S + n;
Writeln (‘Tong cua S = ’,s); Readln
end.
Bài 7: Câu lệnh lặp
4. Các ví dụ tính tổng và tích
Em hãy viết chương trình tính tổng các số nguyên liên tiếp từ n đến m với n,m là các số nguyên dương nhập vào từ bàn phím
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.
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.
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
Bài 7: Câu lệnh lặp
Củng cố