Giáo án Tin học 8 - Tiết 24: Bài tập (Bài 5 từ bài toán đến chương trình) - Năm học 2009-2010

<span class='text_page_counter'>(1)</span>GIÁO ÁN TIN HỌC 8 Tiết PPCT: 24 Ngày soạn: 26/10/2009 Ngày dạy: 2/11/2009 – 7/11/2009 BÀI TẬP ( BÀI 5 TỪ BÀI TOÁN ĐẾN CHƯƠNG TRÌNH) I. Mục tiêu: - Vận dụng cách mô tả thuật toán để viết chương trình đơn giản tính diện tích của hình A và chương trình tìm nghiệm của phương trình bậc nhất. - Hiểu được nội dung của chương trình. II. Chuẩn bị: GV: Bảng phụ. HS: SGK, dụng cụ học tập đầy đủ. III. Hoạt động dạy học: 1/ Ổn định tổ chức: Yêu cầu hs báo cáo sĩ số, kiểm diện học sinh, nộp câu hỏi TN, nộp bài tập về nhà (1’). 2/ Kiểm tra bài cũ: Hoạt động của GV Hoạt động của HS Nội dung TG - Vấn đáp giữa giáo 5’ - Đặt câu hỏi chung cho cả lớp: 1. Xác định kết quả của việc thực viên, học sinh để ôn lại bài cũ. hiện thuật toán sau: B1: x:=x+x+y - Nhóm HS nhận xét, đánh giá HS trả lời câu B2: y:=y+y+x hỏi. B3: x:=x-y - Y/c 1 HS lần lượt trả lời các câu hỏi - 1 HS trả lời các câu trên. hỏi của GV (trình bày trên bảng). - Y/c nhóm HS nhận xét, đánh giá - Nhóm HS nhận xét, HS trả lời câu hỏi. đánh giá HS trả lời câu hỏi. 3/ Bài mới: Hoạt động của GV Hoạt động của HS Nội dung TG Tiết trước chúng ta đã biết thuật toán giải một số bài toán như xác định Input, Output, các phép gán, thuật toán mô tả 3 số dương có lập thành 3 cạnh của một tam giác,.... 15’. Hoạt động 1: Tìm hiểu chương trình tìm diện tích của hình A. - Y/c Hs cho biết thuật toán tính diện tích hình A gồm hình chữ nhật và hình bán nguyệt ghép lại?. Viết chương trình tính diện tích hình A được - Input: a là ½ chiều rộng ghép từ 1 hình chữ nhật hình chữ nhật và là bán và 1 hình bán nguyệt. kính hình bán nguyệt, b là Program DientichhinhA; Uses Crt; chiều dài hình chữ nhật. - Output: Diện tích hình A. Var a,b:Integer; Begin - Bước 1: S1 ← 2ab. Trang 1 Lop8.net.

<span class='text_page_counter'>(2)</span> - Bước 2: S2 ← πa2/2. - Bước 3: S ← S1+S2. Clrscr; Writeln(‘nhapba:’);Read(a); Writeln(‘nhap b:’);Read(b); Writeln(‘Dien tich hinh A la:’ , 2*a*b+pi*a*a/2); Readln; end.. - Cho biết các biến trong - Có biến a và b chương trình? - Cho biết cách khai báo các - Var a, b: Integer; biến này? - Cho biết cách viết câu lệnh Writeln(‘nhapba:’);Read(a); để nhập giá trị cho các biến Writeln(‘nhap b:’);Read(b); a, b? - Cho biết cách tính diện tích của hình A từ thuật toán? - 2*a*b+pi*a*a/2 - Câu lệnh tính diện tích được viết như thế nào? Writeln(‘Dien tich hinh A la:’ trình , 2*a*b+pi*a*a/2); Viết chương trình nhập 15’ Hoạt động 2: Tìm hiểu chương nhập vào hai số vào hai số và tính tổng, và tính tổng, hiệu, tích, Div, Mod, thương của nó hiệu, tích, Div, Mod, - Cho biết những điều kiện thương của nó? ban đầu của bài toán và kết Program Cacpheptinh; - Input: hai số a, b Uses Crt; quả thu được? - Output: kết quả của các Var x, y: Integer; phép toán tổng, hiệu, tích, Begin Div, Mod, thương của nó Clrscr; - Mô tả thuât toán của bài Writeln(‘nhap x:’);Read(x); toán này? - Bài toán đơn giản, không Writeln(‘nhap y:’);Read(y); Writeln(‘Tong la:’ , x+y); cần phải tìm thuật toán, Writeln(‘Tong la:’ , x-y); thuật toán nằm ngay trong Writeln(‘Tong la:’ , x/y); đề bài. - Nêu cách khai báo biến? - Var x, y: Integer; Writeln(‘Tong la:’ , x Mod y); - Hãy viết các câu lệnh nhập x và y? Writeln(‘nhapx:’);Read(x); Writeln(‘Tong la:’ , x Div Writeln(‘nhapy:’);Read(y); y); - Viết các câu lệnh tính các Readln; phép tính theo đề bài? Writeln(‘Tong la:’ , x+y); End. Writeln(‘Tong la:’ , x-y); Writeln(‘Tong la:’ , x/y); Writeln(‘Tong la:’ , x Mod y); Writeln(‘Tong la:’ , x Div y); 4. Củng cố, dặn dò: TG. Hoạt động của GV 9’ * Củng cố: - Phải chăng tất cả các bài toán đều phải tìm thuật toán? - Trình bày lại “khung sườn” của một chương trình pascal.. Hoạt động của HS. Trang 2 Lop8.net. Nội dung - Hs trả lời một số câu hỏi của GV đặt ra..

<span class='text_page_counter'>(3)</span> Yêu cầu hs lần lượt trả lời, nhận xét. - Hs trả lời và nhận xét * Dặn dò: từng câu hỏi của GV. - Yêu cầu hs về nhà xem lại nội dung bài, làm bài tập viết chương trình tính diện tích hình tam giác và hình chữ nhật.. Trang 3 Lop8.net.

<span class='text_page_counter'>(4)</span>