Giáo án môn Tin học 8, kì II - Tiết 51: Bài thực hành 6: Sử dụng lệnh lặp while … do

 Tuần 27 - Tiết 51
 Ngày dạy: 25/02/2015
Bài thực hành 6:
SỬ DỤNG LỆNH LẶP WHILE  DO
1. MỤC TIÊU:
Kiến thức:
 * Hoạt động: - Học sinh biết và hiểu từng câu lệnh trong chương trình của bài tập 1; hiểu hơn quá trình hoạt động của câu lệnh lặp While  do trong chương trình.
 - Học sinh biết thao tác với phần mềm Pascal để thực hiện viết chương trình, dịch, chạy và lưu chương trình.
Kĩ năng: 
Hs thực hiện được:
- Học sinh thực hiện được các thao tác với phần mềm Pascal để thực hiện viết chương trình, dịch, chạy và lưu chương trình; viết chương trình Pascal có câu lệnh lặp While do.
Hs thực hiện thành thạo:
- Học sinh thực hiện thành thạo các thao tác với phần mềm Pascal để thực hiện viết chương trình, dịch, chạy và lưu chương trình; viết chương trình Pascal có câu lệnh lặp While do.
Thái độ:
Thói quen:
- Học sinh thói quen tự rèn luyện trong của môn học có ‏ý thức học tập bộ môn, ham thích tìm hiểu về tư duy khoa học. 
Tính cách:
- Rèn luyện tính kiên trì trong học tập, rèn luyện.
2. NỘI DUNG BÀI HỌC:
- Thực hành sử dụng lệnh lặp While ... do.
3. CHUẨN BỊ:
3.1. Giáo viên: Phòng máy. Phần mềm Pascal hoạt động tốt.
3.2. Học sinh: Học bài cũ, xem trước bài mới.
4. TỔ CHỨC CÁC HOẠT ĐỘNG HỌC TẬP:
Ổn định tổ chức và kiểm diện. (2 phút)
Giáo viên ổn định tổ chức và kiểm diện học sinh.
Kiểm tra miệng:
Lòng trong quá trình thực hành.
Tiến trình bài học:
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG BÀI HỌC
 Hoạt động: (35 phút)
 Viết chương trình sử dụng lệnh lặp While  do để tính n số thực x1,x2,x3xn. Các số n và x1,x2,x3, xn được nhập từ bàn phím.
Gv: Đưa ra ý tưởng của bài toán. Yêu cầu hs xác định Input và Output bài toán.
Hs: Xác định Input và Output bài toán.
Gv: Hướng dẫn hs giải quyết câu a.
Hs: Cùng giáo viên giải quyết câu a.
Gv: Hướng dẫn sơ bộ câu b và c.
Hs: Thực hiện các yêu cầu của giáo viên theo hướng dẫn
Gv: Hỗ trợ học sinh trong quá trình thực hành.
Gv: Yêu cầu học sinh suy nghĩ câu d (nếu còn thời gian.
Bài tập 1:
Viết chương trình sử dụng lệnh lặp While  do để tính n số thực x1,x2,x3xn. Các số n và x1,x2,x3, xn được nhập từ bàn phím.
Program Tinh_trung_binh;
Var n, dem: integer;
 X, Tb: real;
Begin 
 Dem:=0; Tb:=0;
 Writeln(‘nhap cac so can tinh n =’); Readln(n);
 While dem < n do
Begin
Dem:= dem + 1;
Writeln(‘nha so thu’, dem,’=’); 
Readln(x);
Tb:= Tb + x;
End;
 Tb:=Tb/n;
 Writeln(‘Trung binh của’,n,’so là =’, Tb:10:3);
 Writeln(‘Nhấn Enter để thoát ...’);
 Readln;
End.
Tổng kết. (3 phút)
 - Giáo viên đánh giá kết quả tiết thực hành
- Tuyên giương các em làm tốt, nhiệt tình. Phê bình nhắc nhở những em chưa nghiêm túc trong tiết thực hành.
Hướng dẫn học tập. (5 phút)
Đối với bài học ở tiết này:
- Về nhà xem lại các chương trình đã được thực hành hôm nay.
- Về nhà viết lại và chạy thử chương trình với các dữ liệu vào khác nhau để hiểu hơn chương trình và câu lệnh lặp (nếu có điều kiện).
Đối với bài học ở tiết tiếp theo:
- Xem trước các bài tập 1d và bài 2 của bài để tiết sau chúng ta thực hành
PHỤ LỤC.
----------˜˜&™™----------