Bai 8 t2

Ngày soạn :
Ngày dạy : 8A : 8B : 8G :
8C : 8D : 8E :
Tiết 30:
Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC
(Tiếp theo)

I.Mục tiêu:
1. Kiến thức:
- Biết câu lệnh lặp với số lần chưa biết trước while...do… trong Pascal.
2. Kĩ năng:
- 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.
3. Thái độ:
- Nghiêm túc trong quá trình hcọ tập và rèn luyện.
II. Chuẩn bị
GV: SGK, máy chiếu, phim trong các ví dụ về chương trình
HS: Xem trước bài ở nhà
III. Tiến trình bài giảng
1. Ổn định:
2. Kiểm tra bài cũ:
3. Bài mới
Hoạt động GV và HS
Nội dung

+ 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 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".
+ Hs : Chú ý nghe



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.



4. Củng cố:
- Ghi nhớ sgk