- Giáo viên: SGK, tài liệu tham khảo Học sinh: SGK, Đọc bài trớc.
5. Đặn dò và hớng dẫn học sinh học tập ở nhà.
- Trả lời câu hỏi 1, 2, 3 sgk vào vở bài tập.
Ngày dạy: 07/03/2011
Bài 8: lặp với số lần cha biết trớc (Tiếp) a. Mục tiêu
1. Kiến thức: Biết đợc các hoạt động lặp với số lần cha biết trớc, biết cú pháp và hoạt động của câu lệnh lặp với số lần cha biết trớc trong ngôn ngữ lập trình Pascal, biết đợc lỗi lập trình cần tránh.
2. Kỹ năng: Vận dụng sự hiểu biết đó vào viết các chơng trình máy tính có sử dụng lệnh lặp với số lần cha biết trớc.
3. Thái độ: Rèn luyện tính kiên trì ham học hỏi, hiểu biết.
b. phơng pháp
- Giới thiệu, hớng dẫn, minh hoạ.
- Đặt câu hỏi cho HS trả lời và đa ra nhận xét.
C. Chuẩn bị của giáo viên và học sinh
- Giáo viên: SGK, tài liệu tham khảo.- Học sinh: SGK, Đọc bài trớc. - Học sinh: SGK, Đọc bài trớc.
D. Tiến trình lên lớp
1. ổn định lớp
8A 8B
2. Kiểm tra bài cũ
Viết cú pháp và trình bày hoạt động của câu lệnh lặp với số lần không biết trớc trong ngôn ngữ lập trình Pascal.
3. Bài mới
HĐ của Thầy và trò Ghi Bảng
Hoạt động 1: 2. Ví dụ về lệnh lặp với số lần cha biết trớc (Tiếp)
Để viết chơng trình tính tổng này ta có thể sử dụng câu lệnh nào?
Hãy viết chơng trình tính tổng trên với câu lệnh for ... do.
Ví dụ 5: Sử dụng ngôn ngữ lập trình Pascal viết chơng trình tính tổng:
T = 1 + 2 1 + 3 1 +...+ 100 1 . Suy nghĩ, thảo luận -> trả lời:
Ta có thể sử dụng câu lệnh for ... do hoặc while ... do.
Suy nghĩ, thảo luận, viết chơng trình. Uses crt;
Var T: real; i: byte; Begin
T:= 0
For i:=1 to 100 do T := T + 1/i; Writeln(‘Tong la:’,T:6:2); Readln;
Hãy viết chơng trình tính tổng trên với câu lệnh while ... do.
Qua ví dụ 5 hãy rút ra nhận xét?
End.
Suy nghĩ, thảo luận, viết chơng trình. Uses crt;
Var T: real; i: byte; Begin T:= 0, i:=1; While i<= 100 do Begin T := T + 1/i; i := i +1; End; Writeln(‘Tong la:’,T:6:2); Readln; End.
Suy nghĩ, thảo luận -> trả lời:
Ta có thể dùng lệnh while ... do để thay cho lệnh for ... do.
Hoạt động 2: 3. Lặp vô hạn lần - lỗi lập trình cần tránh
Trình bày cho hs biết khi viết chơng trình sử dụng cấu trúc lặp cần chú ý tránh tạo nên vòng lặp không bao giờ kết thúc -> lấy vị dụ minh hoạ để hs hiểu.
Trong chơng trình trên giá trị của a có thay đổi hay không? điều kiện a <6 sẽ thế nào? Hãy rút ra nhận xét? Chú ý lắng nghe, ghi nhận Ví dụ lặp vô hạn: Var a:integer; Begin a := 5; while a < 6 do writeln(‘A’); readln; end.
Suy nghĩ, thảo luận -> trả lời:
Giá trị của a luôn bằng 5, điều kiện a <6 sẽ luôn đúng -> lệnh writeln(‘A’) luôn đợc thực hiện.
=> Khi thực hiện vòng lặp, điều kiện trong câu lệnh phải đợc thay đổi để sớm hay muộn giá trị của điều kiện đợc chuyển từ đúng sang sai.
4. Cũng cố.
- GV hệ thống lại nội dung chính của tiết học và yêu cầu hs nhắc lại. - Làm bài tập 4 sgk.
5. Hớng về nhà.
- Yêu cầu hs về nhà học bài cũ. - Làm bài tập 4 vào vở bài tập.
Ngày soạn: 06/03/2011 Ngày dạy: 11/03/2011
Tiết 51
Bài thực hành 6: sử dụng lệnh lặp while... do a. Mục tiêu
1. Kiến thức: Hiểu câu lệnh lặp while... do trong chơng trình, viết chơng trình có sử dụng câu lệnh while... do.
2. Kỹ năng: Rèn luyện kỷ năng đọc, hiểu chơng trình, viết chơng trình.
3. Thái độ: Nghiêm túc trong học tập, ham thích học hỏi nghiên cứu lập trình.
b. phơng pháp
- Giới thiệu, hớng dẫn, minh hoạ bằng cách thực hiện trên máy. - Đặt câu hỏi cho HS trả lời và đa ra nhận xét.
C. Chuẩn bị của giáo viên và học sinh
- Giáo viên: SGK, tài liệu tham khảo, máy tính đã đợc cài đặt sẵn môi trờng lập trình Turbo Pascal. trình Turbo Pascal.
- Học sinh: SGK, Đọc bài trớc.
D. Tiến trình lên lớp
1. ổn định lớp.
8A 8B
2. Kiểm tra bài cũ.
- Hãy vẽ cấu trúc, viết cú pháp và cho biết hoạt động của câu lệnh lặp với số lần lặp cha biết trớc trong ngôn ngữ lập trình Pascal?
- Làm bài tập 3 sgk?
3. Bài mới
HĐ của Thầy và trò Ghi Bảng
Hoạt động 1: 1. Mục đích yêu cầu
Trình bày mục đích yêu cầu của bài thực hành để hs biết -> thực hành đạt mục đích yêu cầu đó.
Chú ý lắng nghe, ghi nhận:
- Viết chơng trình pascal có sử dụng lệnh lặp với số lần cha biết trớc.
- Rèn luyện kỷ năng đọc chơng trình, tìm hiểu tác dụng của các câu lệnh.
Hoạt động 2: 2. Nội dung
Yêu cầu hs đọc đề ra bài tập 1 skg.
Hãy nêu ý tởng để giải quyết bài toán.
Bài 1: Viết chơng trình sử dụng lệnh lặp While... do để tính trung bình n số thực: x1, x2, x3,..., xn. Các số x1, x2, x3,..., xn đợc nhập vào từ bàn phím.
Suy nghĩ, thảo luận -> trả lời: ý
t ởng : Sử dụng một biến đếm và lệnh lặp While...do để nhập và cộng dần các số vào một biến kiểu số thực cho đến khi nhập đủ n số.
Yêu cầu hs suy nghĩ mô tả thuật toán của bài toán.
Gõ chơng trình, lu chơng trình.
biến dự định sẽ sử dụng và kiểu của chúng.
Suy nghĩ, thảo luận -> trả lời: Thuật toán
Input: n số thực: x1, x2, x3,..., xn
Output: Giá trị trung bình của n số thực: (x1 + x2 + x3 +... + xn)/ n.
Bớc 1: Nhập n là số lợng số thực sẽ đợc nhập từ bàn phím. Tb <- 0, dem <- 0
Bớc 2: Trong khi dem < n thì nhập giá trị của số thực x từ bàn phím và Tb <- Tb + x, dem <- dem + 1.
Bớc 3: Tb <- Tb/ dem.
Bớc 4: Thông báo kết quả và kết thúc. b. Gõ chơng trình sau và lu chơng trình với tên Tinh_TB:
chú ý lắng nghe, thực hiện: Program Tinh_trung_binh; Uses crt;
Var n, dem: integer; x, TB: real; Begin
clrscr;
write(‘Nhap so cac so can tinh n=’); readln(n); TB :=0; dem:=0; While dem < n do Begin Write(‘Nhap so thuc thu:’,dem,’=’); readln(x); TB := TB + x; End; TB := TB/ n;
Writeln(‘Trung binh cua’, n ,’ so la:’,TB:10:3);
Readln; End.
c. Đọc và tìm hiểu ý nghĩa của từng câu lệnh. Dịch chơng trình và sửa lỗi, nếu có. Chạy chơng trình với các bộ dữ liệu đợc gõ từ bàn phím và kiểm tra kết quả nhận
Yêu cầu hs suy nghĩ, viết chơng trình bằng cách sử dụng câu lệnh lặp for...do.
d. Viết lại chơng trình bằng cách sử dụng câu lệnh lặp for... do thay cho câu lệnh while... do.
Suy nghĩ, thảo luận -> viết chơng trình. Program Tinh_trung_binh; Uses crt; Var n, i: integer; x, TB: real; Begin clrscr;
write(‘Nhap so cac so can tinh n=’); readln(n);
TB :=0;
For i:=1 to n do Begin
Write(‘Nhap so thuc thu:’,i,’=’); readln(x);
TB := TB + x; End;
TB := TB/ n;
Writeln(‘Trung binh cua’, n ,’ so la:’,TB:10:3);
Readln; End.
Hoạt động 2: Thực hành
Chú ý quan sát quá trình thực hành của học sinh, chỗ nào học sinh còn lúng túng cha hiểu rõ -> giáo viên hớng dẫn lại.
Chú ý thực hành theo nội dung giáo viên đề ra.
4. Cũng cố.
- Hệ thống lại những nội dung lý thuyết cần nhớ sau bài thực hành.
- Nhận xét chung về giờ thực hành, động viên khích lệ những hs thực hành tốt đồng thời nhắc nhở hs một số lỗi thờng gặp trong quá trình thực hành để hs khắc phục.
5. Hớng dẫn về nhà.
- Yêu cầu hs về nhà ôn lại phần lý thuyết cần nhớ sau tiết thực hành. - Thực hành thêm (nếu có máy).
Ngày soạn: 13/03/2011
Ngày dạy: 14/03/2011
Bài thực hành 6: sử dụng lệnh lặp while... do (Tiếp) a. Mục tiêu
1. Kiến thức: Hiểu câu lệnh lặp while... do trong chơng trình, viết chơng trình có sử dụng câu lệnh while... do, tìm hiểu chơng trình nhận biết một số nguyên tố.
2. Kỹ năng: Rèn luyện kỷ năng đọc, hiểu chơng trình, viết chơng trình có sử dụng lệnh lặp với số lần cha xác định trớc.
3. Thái độ: Nghiêm túc trong học tập, ham thích học hỏi nghiên cứu lập trình.
b. phơng pháp
- Giới thiệu, hớng dẫn, minh hoạ bằng cách thực hiện trên máy. - Đặt câu hỏi cho HS trả lời và đa ra nhận xét.
C. Chuẩn bị của giáo viên và học sinh
- Giáo viên: SGK, tài liệu tham khảo, máy tính đã đợc cài đặt sẵn môi trờng lập trình Turbo Pascal. trình Turbo Pascal.
- Học sinh: SGK, Đọc bài trớc.
D. Tiến trình lên lớp
1. ổn định lớp.
8A 8B
2. Kiểm tra bài cũ.
- Hãy nêu sự giống nhau và khác nhau giữa câu lệnh lặp while... do và câu lệnh lặp for...do?
- Làm bài tập 4 sgk? - Làm bài tập 5 sgk?
3. Bài mới
HĐ của Thầy và trò Ghi Bảng
Hoạt động 1: 2. Nội dung (Tiếp)
Yêu cầu hs đọc bài tập 2.
Hãy cho biết số nguyên tố là số nh thế nào?
Hãy trình bày ý tởng của em để giải quyết bài toán?
Bài 2: Tìm hiểu chơng trình nhận biết một số tự nhiên n đợc nhập vào từ bàn phím có phải là một số nguyên tố hay không.
Suy nghĩ, trả lời.
Suy nghĩ, thảo luận -> trả lời: ý
t ởng:
Kiểm tra lần lợt n có chia hết cho các số tự nhiên 2 ≤ i ≤ n -1 hay không. Kiểm tra tính chia hết bằng phép chia lấy phần d (mod).
a. Đọc và tìm hiểu ý nghĩa của từng
cầu hs cho biết ý nghĩa của từng câu lệnh trong chơng trình?
Yêu câu hs thực hiện gõ, dịch và chạy thử chơng trình -> rút ra nhận xét về ch- ơng trình.
Chú ý lắng nghe, suy nghĩ, thảo luận -> trả lời:
Uses crt;
Var n, i: integer; Begin
Clrscr;
Write(‘Nhap vao mot so nguye:’);
Readln(n);
If n <= 1 then writeln(n, ‘khong la so nguyen to;) Else Begin i := 2; while (n mod i <> 0) do i:= i +1; if i = n then
writeln(n, ‘la so nguyen to’) else writeln(n,‘khong la so nguyen to;) end; readln; end. b. Gõ, dịch và chạy thử chơng trình với một vài độ chính xác khác nhau. Chú ý thực hiện -> rút ra nhận xét.
Hoạt động 2: Thực hành
Chú ý quan sát quá trình thực hành của học sinh, chỗ nào học sinh còn lúng túng cha hiểu rõ -> giáo viên hớng dẫn lại.
Chú ý thực hành theo nội dung giáo viên đề ra.
4. Cũng cố.
- Hệ thống lại những nội dung lý thuyết cần nhớ sau bài thực hành.
- Nhận xét chung về giờ thực hành, động viên khích lệ những hs thực hành tốt đồng thời nhắc nhở hs một số lỗi thờng gặp trong quá trình thực hành để hs khắc phục.
- Yêu cầu hs đọc phần tổng kết.
- Yêu cầu hs đọc bài đọc thêm 2 (sgk).
5. Hớng dẫn về nhà.
- Yêu cầu hs về nhà ôn lại phần lý thuyết cần nhớ sau bài thực hành. - Thực hành thêm (nếu có máy).
Ngày soạn: 13/03/2011
Ngày dạy: 16/03/2011
Bài tập a. Mục tiêu
1. Kiến thức: Hệ thống lại một số kiến thức về lý thuyết đã học.
2. Kỹ năng: Vận dụng sự hiểu biết đó vào viết các chơng trình máy tính có sử dụng lệnh điều kiện, lệnh lặp với số lần biết trớc và lệnh lặp với số lần cha biết trớc.
3. Thái độ: Rèn luyện tính kiên trì ham học hỏi, hiểu biết.
b. phơng pháp
- Giới thiệu, hớng dẫn, minh hoạ.
- Đặt câu hỏi cho HS trả lời và đa ra nhận xét.
C. Chuẩn bị của giáo viên và học sinh