Chào mừng quý thầy cô giáo về dự giờ!
SỬ DỤNG LỆNH LẶP FOR...DO
Bài thực hành 5
Tiết 42
Câu hỏi
Kiểm tra bài cũ:
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
* Viết chương trình Pascal có câu lệnh for…do
* Tiếp tục nâng cao kĩ năng đọc hiểu chương trình
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
* Sử dụng các câu lệnh for…do lồng nhau để viết chương trình tìm số gà và chó của bài toán cổ sau:
Vừa gà vừa chó
Bó lại cho tròn
Ba mươi sáu con
Một trăm chân chẵn
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
Xác định input, output của bài toán?

input: ga + cho = 36
ga*2 + cho*4 = 100
output: số gà, số chó
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1
2
3
4
5
…
36
1
2
3
4
5
6
7
…
25
1
2
3
4
5
6
7
…
25
1
2
3
4
5
6
7
…
25
1
2
3
4
5
6
7
…
25
1
2
3
4
5
6
7
…
25
…
…
…
…
…
…
…
…
…
1
2
3
4
5
6
7
…
25
Xét tất cả các trường hợp:

Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
for ga:=1 to 36 do
for cho:=1 to 25 do
if (ga+cho=36) and (ga*2+cho*4=100) then
writeln(‘so ga la :’, ga , ‘; so cho la :’ , cho);

Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
Var ga, cho: byte;
Begin
for ga:=1 to 36 do
for cho:=1 to 25 do
if (ga+cho=36) and (ga*2+cho*4=100) then
writeln(‘so ga la :’, ga , ‘; so cho la :’ , cho);
readln;
End.
Gõ và chạy chương trình, quan sát kết quả:
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
Bài 3. Sử dụng các câu lệnh for…do lồng nhau để in ra màn hình các số từ 1 đến 99 theo dạng bảng như hình sau:
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Tìm hiểu chương trình sau:
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
1. Mục đích, yêu cầu
2. Nội dung
Thực hiện:
- Gõ chương trình
- Lưu chương trình với tên TAOBANG.PAS.
- Chạy chương trình, quan sát kết quả trên màn hình.
Sử Dụng Lệnh Lặp For...Do
Bài thực hành 5
Cấu trúc lặp với số lần được biết trước:
For …do
Giống như các câu lệnh rẽ nhánh If…then, các câu lệnh For …do cũng có thể lồng trong nhau. Khi đó các biến đếm trong các câu lệnh lặp phải khác nhau
Ghi nhớ
Cám ơn quí thầy cô
Các em học sinh
&