GIáo án Tin học 8 tiết 54+ 55: Bài tập

BÀI TẬP
Ngày soạn: ././2015
Tiết theo PPCT: 54-55
Tuần: 27-28
1. Mục tiêu:
1.1/ Kiến thức:
- Hiểu câu lệnh lặp while..do trong chương trình.
- Biết lựa chọn câu lênh lặp while..do hoặc for..do phù hợp với tình huống cụ thể.
1.2/ Kĩ năng: 
- Rèn luyện kĩ năng đọc hiểu chương trình, tìm hiểu tác dụng của các câu lệnh.
- Viết chương trình Pascal sử dụng câu lệnh lặp while...do
1.3/ Thái độ: Thái độ học tập nghiêm túc, yêu thích môn học.
2. Chuẩn bị:
2.1/ Chuẩn bị của GV: Phòng máy.
2.2/ Chuẩn bị của HS: Chuẩn bị các bài tập ở SGK, SBT.
3. Tổ chức các hoạt động học tập:
3.1/ Ổn định lớp:
3.2/ Kiểm tra bài cũ:
3.3/ Tiến trình bài học:	 
Hoạt động của GV
Hoạt động của HS
Nội dung
Hoạt động 1: Kiểm tra bài cũ
- HS1: Viết cú pháp câu lệnh lặp For...do và cho biết hoạt động của câu lệnh đó.
- HS2: Viết cú pháp câu lệnh lặp While...do và cho biết hoạt động của câu lệnh đó.
- Yêu cầu HS nhận xét. GV chấm điểm và nhấn mạnh lại hoạt động của hai câu lệnh trên.
- HS1: 
+ Cú pháp của vòng lặp xác định.
For := to do ;
+ Nêu hoạt động.
- HS2:
+ Cú pháp của vòng lặp chưa xác định.
While do ;
+ Nêu hoạt động.
Hoạt động 2: Bài tập.
Bài tập 8.3-SBT: Trong các câu lệnh lặp Pascal sau đây, câu nào sai và sai ở đâu?
a/ while i:= 1 do t:= 10;
b/ while a<=b; do write(‘b khong nho hon a’);
c/ while 1=1 do write(‘toi lap trinh gioi’);
d/ i:=1; while i<10 do sum:=sum+i; i:= i+1;
Bài tập 8.7-SBT: Sau khi thực hiện các giá trị i, j, k của các đoạn chương trình sau bằng bao nhiêu?
* Đoạn chương trình 1:
	i:=1; j:=2; k:=3;
	while i<6 do i:=i+1; j:=j+1; k:=k+j;
* Đoạn chương trình 2:
	 i:=1; j:=2; k:=3;
	while i<6 do begin i:=i+1; j:=j+1; k:=k+j; end;
Bài tập 4-SGK:
- Yêu cầu HS đọc và nghiên cứu bài tập 4-SGK.
- GV đưa nội dung bài tập lên bảng yêu cầu HS trả lời.
a/ S:=0; n:=0
 while S<=10 do 
 begin n:= n+1; S:= S+n end;
b/ S:=0; n:=0
 while S<=10 do 
 n:= n+1; S:= S+n;
Mỗi đoạn chương trình trên thực bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
Bài tập 8.4-SBT: Sau khi thực thực hiện đoạn chương trình sau sẽ có kết quả gì?
	so:=1;
	while so<10 do writeln(so);
	so:=so+1;	
Bài tập 8.3-SBT:
a/ Sai, thừa dấu : (i:=1).
b/ Sai, thừa dấu ; trước từ khóa do.
c/ Sai, vòng lặp vô hạn do điều kiện luôn luôn đúng.
d/ Sai, vòng lặp vô hạn do không có câu lệnh nào làm thay đổi biến i.
Bài tập 8.7-SBT:
* Đoạn chương trình 1:
	Kết quả: i=6; j=3; k=6
* Đoạn chương trình 2:
	Kết quả: i=6; j=7; k=28
Bài tập 4-SGK:
- HS thực hiện.
a. 5 vòng lặp.
b. Vòng lặp thực hiện vô tận, vì điều kiện S<=10 luôn luôn đúng nên câu lênh luôn được thực hiện. 
Nhận xét: Khi sử dụng câu lệnh While  do cần chú ý điều kiện để tránh lỗi lặp vô hạn lần.
Bài tập 8.4-SBT:
In ra vô hạn số 1, mỗi số trên 1 dòng. Vì trong câu lệnh lặp, điều kiện luôn luôn đúng.
4. Tổng kết và hướng dẫn học tập:
4.1/ Củng cố: 
4.2/ Hướng dẫn về nhà:
- HS học bài kết hợp SGK.
- Xem và làm lại các bài tập vừa làm.
- Làm các bài tập còn lại ở SBT.
- Tiết sau tiếp tục giải bài tập.
Tiết 2:
3. Tổ chức các hoạt động học tập:
3.1/ Ổn định lớp:
3.2/ Kiểm tra bài cũ:
3.3/ Tiến trình bài học:	 
Hoạt động của GV
Hoạt động của HS
Nội dung
Hoạt động 1: Viết chương trình Pascal sử dụng 2 câu lệnh lặp đã học.
BT 8.12-SBT: Viết chương trình sử dụng câu lệnh lặp while ... do để tính tổng
 với , giá trị e là sai số cho trước và được nhập vào từ bàn phím.
- GV gợi ý hướng dẫn HS viết chương trình trên.
BT 7.11-SBT: Viết chương trình tính tổng trong đó n là số nguyên được nhập từ bàn phím.
- Em sử dụng câu lệnh lặp nào để giải bài tập trên? Vì sao?
- GV gợi ý. Yêu cầu HS lên thực hiện.
- Yêu cầu HS nhận xét.
- GV nhận xét và nhấn mạnh lại hoạt động của 2 câu lệnh lặp trên.
BT 8.12-SBT:
Program tong;
Var tong, saiso,: real; n: integer;
Begin
 tong:= 0; n:=1; 
 write(‘cho biet saiso=’); readln(saiso);
 while 1/n>=saiso do
 begin tong:= tong + 1/n; n:=n+1 end;
 writeln(‘Gia tri gan dung cua tong la’,tong:9:0);
 Readln
End.
BT 7.11-SBT:
- Sử dụng câu lệnh lặp For  do, vì dây là bài toán biết trước số lần lặp.
Program tong_nghich_dao;
Var S: real; n, i: integer;
Begin
 Write(‘Nhap n=’); Readln(n);
 S:=0; 
 For i:=1 to n do S:=S+1/i;
 Writeln(‘Tong can tim la:’,S:5:2);
Readln
End.
4. Tổng kết và hướng dẫn học tập:
4.1/ Củng cố: 
4.2/ Hướng dẫn về nhà: HS học bài kết hợp SGK. Xem và làm lại các bài tập vừa làm. Làm các bài tập còn lại ở SBT.