TIET 17-11 (OK)

Ngày soạn : Tiết :
Ngày dạy : Lớp :
BÀI TẬP
I. MỤC TIÊU
1. Kiến thức
- Hiểu được cấu trúc lặp For-do và While-do
- Biết vận dụng cấu trúc lặp với số lần chưa biết trước vào các bài toán cụ thể.
2. Kĩ năng
- Xây dựng thuật toán
- Chuyển từ thuật toán sang chương trình Pascal.
3. Thái độ
- Thái độ say mê, yêu thích nghiên cứu môn Tin học đặc biệt là môn lập trình.
II. PHƯƠNG PHÁP, PHƯƠNG TIỆN DẠY HỌC
1. Chuẩn bị của giáo viên
- Giáo án, SGV, SGK
- Phương pháp thuyết trình, hỏi đáp
2. Chuẩn bị của học sinh
- Sách giáo khoa, vở ghi, đồ dùng học tập.
III. NỘI DUNG BÀI GIẢNG
1. Ổn định tổ chức lớp
- Ổn định lớp.
- Chỉnh đốn trang phục.
- Sĩ số:.........Vắng:......
2. Đặt vấn đề
3. Kiểm tra bài cũ
* Đưa ra câu hỏi.
Viết cấu trúc câu lệnh While-do
*Lên bảng trả lời.
* Câu lệnh While - do
- Cấu trúc:
While <điều kiện> do ;
+ Điều kiện: là biểu thức logic
+ Câu lệnh: là câu lệnh đơn hoặc câu lệnh ghép.









- Nhận xét, đánh giá, cho điểm.
4. Nội dung bài mới
Hoạt động của Giáo viên
Tg
Hoạt động của Học sinh

( Hoạt động 1
Bài tập 1: Kiểm tra tính chẵn, lẻ của một số nguyên nhập từ bàn phím.
- Yêu cầu học sinh suy nghĩ trình bày thuật toán và chương trình.
- Trình chiếu chương trình một số em và nhận xét.

- Đưa chương trình đúng và cho chạy.












Bài tập 2 (6-SGK)
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
Hỏi có bao nhiêu con mỗi loại

- Hướng dẫn, định hướng các em giải quyết bài toán
+ g là số gà
+ c là số chó

- Ta có thể thay giá trị 36 trong vòng for thứ nhất bằng một giá trị khác không?








Bài tập 3
Viết chương trình nhập vào một số nguyên bất kỳ đến khi nào nhập số 0 thì dừng.

- Gợi ý



- Suy nghĩ, trình bày thuật toán và chương trình vào giấy bóng kính.

- Thuật toán:
*Liệt kê:
- B1: Nhập n nguyên.
- B2: Nếu n chia hết cho 2 --> n chẵn
- B3: n là lẻ.
- B 4: kết thúc
*Sơ đồ khối:
*Viết chương trình.
Program chan_le;
uses crt;
var n:integer;
begin
clrscr;
write(`Nhap vao so nguyen n = `);
readln(n);
If n mod 2 = 0 then
writeln(`n la so chan `)
else
writeln(`n la so le`);
readln;
end.

- Với x là số gà, y là
số chó ta sẽ có hệ sau:




program ga_cho;
uses crt;
var
g,c:integer;
Begin
clrscr;
for c:=1 to 36 do
for g:=1 to 36 do
if (g+c=36) and (g+2*c=50) then
begin
writeln(`so cho la `,c,` con`);
writeln(`so ga la `,g,` con`);
end;
readln
End.

- Suy nghĩ trả lời



- Suy nghĩ vận dụng câu lệnh lặp While-do để giải quyết bài toán.

Program vd;
uses crt;
var n:integer;
begin
clrscr;
write(`Nhap vao so nguyen n = `);readln(n);
while n<>0 do
begin
write(`n = `);readln(n);
end;
readln
end.



4. Củng cố
- Câu lệnh lặp For - do
- Câu lệnh lặp While - do
5. Câu hỏi và bài tập
- Làm bài tập còn lại trong SGK và SBT.