Giáo án Tin học 8 - Tiết 36: Ôn tập thực hành - Năm học 2009-2010

GIÁO ÁN TIN HỌC 8
Tiết PPCT: 36
Ngày soạn: 28/11/2009
Ngày dạy: / /2009 – / /2009 
ÔN TẬP THỰC HÀNH
I. Mục tiêu:
- Viết được chương trình Pascal của 3 bài toán tính diện tích hình chữ nhật, tam giác, hình tròn.
II. Chuẩn bị:
GV: Phòng máy.
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ũ: 
5’
TG
Hoạt động của GV
Hoạt động của HS
Nội dung
- Đặt câu hỏi chung cho cả lớp:
1. Cho biết thuật toán tính diện tích hình A được ghép từ hình chữ nhật và hình bán nguyệt.
- Y/c 1 HS lần lượt trả lời các câu hỏi trên.
- Y/c nhóm HS nhận xét, đánh giá HS trả lời câu hỏi.
- 1 HS trả lời các câu hỏi của GV (trình bày trên bảng).
- Nhóm HS nhận xét, đánh giá HS trả lời câu hỏi.
- Vấn đáp giữa giáo viên, học sinh để ôn lại bài cũ.
- Nhóm HS nhận xét, đánh giá HS trả lời câu hỏi.
TG
3/ Bài mới:
30’
Hoạt động của GV
Hoạt động của HS
Nội dung
Những tiết trước chúng ta đã ôn tập nhiều về phần lý thuyết, tiết này, chúng ta sẽ viết chương trình trên máy tính.
- Y/c Hs ghi nhận đề bài
- Y/c lần lượt 3 Hs lên bảng viết chương trình.
- Y/c Hs nhận xét, sửa chửa (nếu có).
- Nhận xét bài làm của học sinh.
- Y/c Hs nhập nội dung chương trình vào môi trường lập trình Pascal.
- Theo dõi, quan sát, trợ giúp HS.
- Viết chương trình theo yêu cầu đề bài.
- Nhập nội dung chương trình.
- Viết chương trình tính diện tích hình tam giác.
Program Dientichtamgiac;
Uses Crt;
Var h,a: Integer;
Begin
Clrscr;
Write(‘Nhap do dai canh day a=’);Read(a);
Write(‘Nhap chieu cao h=’);Read(h);
Write(‘Dien tich hinh tam giac la:’ , a*h/2);
Readln;
End.
- Viết chương trình tính diện tích hình chữ nhật.
Program Dientichhinhchunhat;
Uses Crt;
Var a,b: Integer;
Begin
Clrscr;
Writeln(‘nhap chieu rong hinh chu nhat a=’);Read(a);
Writeln(‘nhap chieu dai hinh chu nhat b=’);Read(b);
Writeln(‘Dien tich hinh chu nhat la:’ , a*b);
Readln;
End.
- Viết chương trình tính diện tích hình tròn.
Program Dientichhinhtron;
Uses Crt;
Var r: Integer;
Begin
Clrscr;
Write(‘Nhap ban kinh r=’);Read(r);
Write(‘Dien tich hinh vuong la:’ , r*r*3.14);
Readln;
End.
4. Củng cố, dặn dò:
9’
TG
Hoạt động của GV
Hoạt động của HS
Nội dung
* Củng cố:
- Gọi 2 -3 Hs thực hiện lại những thao tác nhập chương trình. 
* Dặn dò:
- Yêu cầu hs về nhà xem lại nội dung lý thuyết.
- Hs trả lời và nhận xét từng câu hỏi của GV.
- Hs trả lời một số câu hỏi của GV đặt ra.