Tin 8 VIP Pro T31-32

Giáo án Tin 8 Trờng THCS Lê Hồng Phong Ngày soạn: 01/ 12/08 Ngày giảng: 8A: 8B: 8C: Tiết 31 - 32: Bài thực hành 6: Sử dụng lệnh lặp while do I. Mục tiêu bài học: 1. Kiến thức: - Biết nhu cầu cần có cấu trúc lặp trong lập trình - Bit ngụn ng lp trỡnh dựng cu trỳc lp ch dn mỏy tớnh thc hin lp i lp li cụng vic no ú mt s ln. - Biết Ngôn ngữ Pascal thể hiện cấu trúc lặp với số lần lặp cha biết trớc bằng câu lệnh : while.do. - Biết viết chơng trình sử dụng câu lệnh lặp với số lần cha biết trớc. 2. K nng: - Vit ỳng c lnh while do trong mt s tỡnh hung n gin. - Bit Khi no thỡ s dng n cõu lnh lp với số lần cha biết trớc - Nâng cao kĩ năng đọc hiu c cõu lnh lp vi s ln cha bit trc whiledo trong Pascal. 3. Thỏi : - Nghiờm tỳc trong hc tp cn tp trung n bi hc, chỳ ý n ý ngha ca cõu lnh lp. II. Chuẩn bị: 1. Giỏo viờn: Giỏo ỏn, SGK, tài liệu, 2. Hc sinh: SGK, v ghi, chun b b i nh , đồ dùng học tập III. Tiến trình lên lớp: 1. ổn định tổ chức 2. Kiểm tra: ? Em hãy viết cấu trúc câu lệnh lặp Whiledo. Giải thích ý nghĩa cụ thể của các thành phần trong câu lệnh. 3. Nội dung thực hành: Hoạt động của GV - HS Nội dung thực hành Hoạt động 1: Tập gõ chơng trình có sẵn và tìm hiểu ý nghĩa của chơng trình Bài tập : Viết chơng trình Pascal thể hiện thuật toán tính tổng n số - GV: Yêu cầu HS viết thuật toán Bài tập : Chơng trình Pascal thể hiện thuật toán tính tổng n số trong ví dụ 2. 16 Giáo án Tin 8 Trờng THCS Lê Hồng Phong - HS: Nhóm viết thuật toán và trao đổi thống nhất giữa các nhóm. - GV : Nhận xét, chốt lại. - GV: yêu cầu dựa vào thuật toán và VD 4 trang 69 để thực hành viết chơng trình Pascal tính tổng n số. - HS: HĐN thực hành viết chơng trình: - GV: Theo dõi và trả lời thắc mắc của HS - GV: Yêu cầu chạy chơng trình và tìm n, - HS: Chạy chơng trình : n = 45, và tổng đầu tiên lớn hơn 1000 là 1034. * Thuật toán: + Bc 1. S 0, n 0. + Bc 2. Nu S 1000, n n + 1; ngc li chuyn ti bc 4. + Bc 3. S S + n v quay li bc 2. + Bc 4. In kt qu : S v n l s t nhiờn nh nht sao cho S > 1000. Kt thỳc thut toỏn. * Chơng trình Pascal: 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. Chạy chơng trình : n = 45, và tổng đầu tiên lớn hơn 1000 là 1034. Hoạt động 2: Gõ chơng trình, lu và tìm hiểu ý nghĩa các câu lệnh. - GV: yêu cầu HS nghiên cứu bài tập 1 SGK T 72. - HS: Cá nhân đọc bài và nghiên cứu ? Các biến chúng ta dự định sẽ sử dụng và kiểu của chúng là gì? - HS: Các biến N, dem : integer; X, TB : real; - GV: Yêu cầu HĐN gõ chơng trình và lu chơng trình với tên Tinh_TB Bài tập 1: * Các biến sẽ sử dụng trong chơng trình: N, dem : integer; X, TB : real; 17 Giáo án Tin 8 Trờng THCS Lê Hồng Phong - HS: HĐN thực hành - GV: Quan sát và HD, uốn nắn kịp thời. - GV: Yêu cầu đọc và tìm hiểu ý nghĩa của từng câu lệnh. - GV: Yêu cầu tìm hiểu chơng trình nhận biết một số tự nhiên N đợc nhập vào từ bàn phím có phải là số nguyên tố hay không? - HS: Nghiên cứu bài tập Đọc và tìm hiểu ý nghĩa của từng câu lệnh trong chơng trình. - GV: tổ chức cho thảo luận cả lớp tìm hiểu ý nghĩa của từng câu lệnh - HS: Gõ, dịch và chạy thử chơng trình * Chơng trình: Program Tinh_Trung_binh; uses crt; Var n, dem: Integer; x, TB: real; Begin clrscr; dem:=0 ; TB:=0 ; write('Nhap so cac so can tinh n = '); readln(n); while dem<n do 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. Bài tập 2: a) Đọc và tìm hiểu ý nghĩa của từng câu lệnh. b) Gõ, dịch và chạy thử chơng trình: Uses Crt; Var n,i:integer; Begin Clrscr; 18 Giáo án Tin 8 Trờng THCS Lê Hồng Phong - GV: yêu cầu HS chạy chơng trình với một vài độ chính xác khác nhau. - HS: Thực hiện theo yêu cầu của GV. write('Nhap vao mot so nguyen: ');readln(n); If n<=1 then writeln('N khong la so nguyen to') else begin i:=2; while (n mod i<>0) do i:=i+1; if i=n then writeln(n,' la so nguyen to!') else writeln(n,' khong phai la so nguyen to!'); end; readln End. Hoạt động 3: Củng cố: ? Em hãy viết câu cấu trúc câu lệnh lặp với số lần cha biết trớc và phân biệt với câu lệnh lặp với số lần biết trớc. 4. Tổng kết dặn dò: - Nhận xét giờ thực hành, chấm điểm kết quả và ý thức học giờ thực hành của các nhóm. - Về nhà làm các bài tập cuối mỗi bài học - Giờ sau một tiết bài tập và một tiết kiểm tra thực hành. 19 . Giáo án Tin 8 Trờng THCS Lê Hồng Phong Ngày soạn: 01/ 12/ 08 Ngày giảng: 8A: 8B: 8C: Tiết 31 - 32: Bài thực hành 6: Sử dụng. lu chơng trình với tên Tinh_TB Bài tập 1: * Các biến sẽ sử dụng trong chơng trình: N, dem : integer; X, TB : real; 17 Giáo án Tin 8 Trờng THCS Lê Hồng Phong