Tin học lớp 8. Tiết 42.

Dạy lớp: 8A; 8B; 8E. Ngày soạn: 23/01/2010.
Tiết PPCT: 42. Ngày dạy: 27/01/2010.
BàI 8: Lặp với số lần lặp chưa biết trước. (T2)
I.Mục tiêu:
- Biết câu lệnh lặp với số lần chưa biết trước while...do… trong Pascal.
- Lấy được các vị cụ cụ thể về câu lệnh lặp với số lần chưa biết trước.
- Nghiêm túc trong quá trình hcọ tập và rèn luyện.
II. Chuẩn bị
- GV: Soạn bài, đọc tài liệu tham khảo, dụng cụ học dạy học.
- HS: Xem bài trước ở nhà, dụng cụ học tập.
III. Tiến trình bài giảng
Hoạt động GV và HS
Nội dung

Hoạt động 1
+ G : ta tiếp tục xét các ví dụ mà trong chương trình có câu lệnh với số lần lặp chưa biết trước
Xét ví dụ 4
+ G : Cho học sinh quan sát phim trong chương trình
+ Hs : quan sát
+ G : Chạy tay cho học sinh xem
+ Hs : chú ý nghe và tự chạy tay lại
+ G : Yêu cầu học sinh mở máy tính và mở chương trình ví dụ 4 ( giáo viên chuẩn bị chương trình mẫu và đưa lên các máy )
+ Hs : thực hiện
+ G : Cho học sinh chạy chương trình trên máy
+ Hs : thực hiện
+ G : chạy chương trình này, ta nhận được giá trị ntn?
+ Hs : Nếu chạy chương trình này ta sẽ nhận được n = 45 và tổng đầu tiên lớn hơn 1000 là 1034.
+ G : giới thiệu ví dụ 5 sgk
Viết chương trình tính tổng

+ G : Cho học sinh quan sát phim trong chương trình
+ Hs : quan sát
+ G : Chạy tay ( cả hai chương trình ) cho học sinh xem
+ Hs : chú ý nghe và tự chạy tay lại
+ G : so sánh kết quả khi chạy hai chương trình
+ Hs : Kết quả bằng nhau
+ G : Ví dụ này cho thấy rằng chúng Hoạt động 2: ta có thể sử dụng câu lệnh while…do thay cho câu lệnh for…do.
+ G : Giới thiệu phần 3
+ G : 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
+ Hs : Chú ý nghe
+ G : Chẳng hạn, chương trình dưới đây sẽ lặp lại vô tận:
var a:integer;
begin
a:=5;
while a<6 do writeln(`a`);
end.
+ Hs : Quan sát
+ G : Trong chương trình trên, giá trị của biến a luôn luôn bằng 5, điều kiện a<6 luôn đúng nên lệnh writeln(`a`) được thực hiện.
Do vậy, 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. Chỉ như thế chương trình mới không "rơi" vào những "vòng lặp vô tận".
Ví dụ 4. Chương trình Pascal dưới đây thể hiện thuật toán tính số n trong ví dụ 2:

var S,n: integer;
begin
S:=0; n:=1;
while S<=1000 do
begin n:=n+1; S:=S+n end;
writeln(`So n nho nhat de tong > 1000 la `,n);
writeln(`Tong dau tien > 1000 la `,S);
end.







Ví dụ 5. Viết chương trình tính tổng

Giải :
Để viết chương trình tính tổng
ta có thể sử dụng lệnh lặp với số lần lặp biết trước for…do:
T:=0;
for i:=1 to 100 do T:=T+1/i;
writeln(T);
Nếu sử dụng lệnh lặp while…do, đoạn chương trình dưới đây cũng cho cùng một kết quả:
T:=0;
i:=1;
while i<=100 do begin T:=T+1/i; i:=i+1 end;
writeln(T);

* Nhận xét : Ví dụ này cho thấy rằng chúng ta có thể sử dụng câu lệnh while…do thay cho câu lệnh for…do.
3. Lặp vô hạn lần – Lỗi lập trình cần tránh
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.


IV. Củng cố hướng dẫn về nhà:
- Ghi nhớ sgk
- Làm bài tập 2,3a,bài 5 SGK/71
- Học bài và làm lại các bài tập