Kiến thức - Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước.. Kỹ Năng - Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh.[r]
(1)Trường THCS Sơn Tiến Gi¸o viªn: Ph¹m TuÊn Anh D¹y líp: 8A; 8B; 8E Ngµy so¹n: 30/01/2010 TiÕt PPCT: 43 Ngµy d¹y: 01/02/2010 Bµi thùc hµnh 6: Sö dông lÖnh lÆp while (T1) I Mục tiêu: Kiến thức - Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước Kỹ Năng - Rèn luyện khả đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh Thái độ: Nghiêm túc II Chuẩn bị: ChuÈn bÞ cña GV: - Gi¸o ¸n, SGK, phßng m¸y, phÇn mÒm pascal ChuÈn bÞ cña HS: - SGK, vë ghi, bót III Tiến trình lên lớp: HOẠT ĐỘNG CỦA THẦY VÀ TRÒ NỘI DUNG KIẾN THỨC Hoạt động 1: KiÓm tra bµi cò: Hãy cho số ví dụ lặp với số lần chưa biết trước GV: Đưa bài tập SGK ? Gọi học sinh nêu ý tưởng - GV hướng dẫn HS: Làm bài tập Bài 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ố n và x1, x2, x3, , xn nhập vào từ bàn phím Ý tưởng: Sử dụng biến đếm và lệnh lặp While…do để nhập và cộng dần các số vào biến kiểu số thực nhập đủ n số a) Mô tả thuật toán chương trình, các biến dự định sử dụng và kiểu chúng b) Gõ chương trình sau đây và lưu chương trình với tên Tinh_TB: Hoạt động Program Tinh_Trung_binh; HS: Đánh máy bài tập vào uses crt; Var msy tính n, dem: Integer; x, TB: real; GV: Kiểm tra và chạy begin chương trình clrscr; dem:=0 ; TB:=0 ; write('Nhap so cac so can tinh n = '); readln(n); Gi¸o ¸n tin häc líp Lop8.net (2) Trường THCS Sơn Tiến Gi¸o viªn: Ph¹m TuÊn Anh while dem<n begin dem:=dem+1; write('Nhap so thu ',dem,'= '); readln(x); TB:=TB+x; end; TB:=TB/n; writeln('Trung binh cua ',n,' so la = ',TB:10:3); writeln('Nhan Enter de thoat '); readln end a) Đọc và tìm hiểu ý nghĩa câu lệnh Dịch chương trình và sửa lỗi, có Chạy chương trình với các liệu gõ từ bàn phím và kiểm tra kết nhận b) Viết lại chương trình cách sử dụng câu lệnh for…do thay cho câu lệnh while…do III Củng cố, hướng dẫn học nhà: - Hiểu các hoạt động lặp với số lần chưa biết trước - Biết sử dụng câu lệnh while - Về nhà xem lại bài học tiết sau chúng ta học tiếp Gi¸o ¸n tin häc líp Lop8.net (3)