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ằng ngày, chúng ta có một số công việc cứ lặp đi lặp lại rất nhiều lần.
- Với máy tính cũng vậy, để 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.
2. Câu lệnh lặp - một lệnh thay cho nhiều lệnh:
Ví dụ 1:Vẽ 3 hình vuông có cạnh 1 đơn vị.
Thuật toán:
Bước 1: Vẽ hình vuông.
Bước 2: Nếu số hình vuông vẽ < 3, di chuyển bút vẽ về bên phải 2 đơn vị và trở lại bước 1; ngược lại, kết thức thuật toán.
Ví dụ 2: Vẽ một hình vuông.
Thuật toán
Bước 1: k ?0 (k là số đoạn thẳng vẽ trước)
Bước 2: k ? k + 1. Vẽ đọan thẳng 1 đơn vị độ dài và quay thước 900 sang phải.
Bước 3: Nếu k < 4 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:
Ví dụ 3: Tính S = 1 + 2 + 3 + ... + 100
Thuật toán
Bước 1: Sum ? 0; i ? 0
Bước 2: i ? i + 1
Bước 3: Nếu i 100 thì Sum ? Sum + 1 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.
2. Câu lệnh lặp - một lệnh thay cho nhiều lệnh:
Mọi ngôn ngữ lập trình đều có "cách" để hiển thị cho máy tính thực hiện cấu trúc lặp với một câu lệnh. Đó là các câu lệnh lặp.
3. Ví dụ về câu lệnh lặp:
Cú pháp:
FOR := TO DO ;
Trong đó:
FOR, TO, DO: từ khóa.
Biến đếm: integer;
Giá trị đầu, giá trị cuối: các giá trị nguyên.
Câu lệnh: đơn giản hoặc ghép.
Số vòng lặp được biết trước và bằng:
giá trị cuối - giá trị đầu + 1
Quy trình thực hiện: ban đầu biến đếm nhận giá trị đầu, sau mỗi vòng lặp, biến đếm được tự động tăng thêm một đơn vị cho đến khi bằng giá trị cuối.
Ví dụ: Chương trình in ra 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);
end.
Ví dụ:Viết chương trình nhập tên bạn và in ra lời chào tương ứng.
program Chaoban;
var i: Integer;
Begin
For i:= 1 to 40 do
Begin
write(`Nhap ten cua ban`);
Readln(Ten);
write(`Chao ban `, Ten);
end;
End.