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 [r]
Trang 1GIÁ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ũ:
- Đặt câu hỏi chung cho cả lớp:
1 Xác định kết quả của việc thực
hiện thuật toán sau:
B1: x:=x+x+y
B2: y:=y+y+x
B3: x:=x-y
- 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
3/ Bài mới:
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,
- 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?
- Input: a là ½ chiều rộng hình chữ nhật và là bán kính hình bán nguyệt, b là chiều dài hình chữ nhật
- Output: Diện tích hình A
- Bước 1: S1 ← 2ab
Viết chương trình tính diện tích hình A được ghép từ 1 hình chữ nhật
và 1 hình bán nguyệt.
Program DientichhinhA; Uses Crt;
Var a,b:Integer;
Begin
TG
15’ Hoạt động 1: Tìm hiểu chương trình tìm diện tích
của hình A.
5’
TG
Trang 2- Cho biết các biến trong
chương trình?
- Cho biết cách khai báo các
biến này?
- Cho biết cách viết câu lệnh
để nhập giá trị cho các biến
a, b?
- Cho biết cách tính diện tích
của hình A từ thuật toán?
- Câu lệnh tính diện tích
được viết như thế nào?
- Cho biết những điều kiện
ban đầu của bài toán và kết
quả thu được?
- Mô tả thuât toán của bài
toán này?
- Nêu cách khai báo biến?
- Hãy viết các câu lệnh nhập
x và y?
- Viết các câu lệnh tính các
phép tính theo đề bài?
- Bước 2: S2 ← πa2/2
- Bước 3: S ← S1+S2
- Có biến a và b
- Var a, b: Integer;
Writeln(‘nhapba:’);Read(a);
Writeln(‘nhap b:’);Read(b);
- 2*a*b+pi*a*a/2
Writeln(‘Dien tich hinh A la:’ , 2*a*b+pi*a*a/2);
- Input: hai số a, b
- Output: kết quả của các phép toán tổng, hiệu, tích, Div, Mod, thương của nó
- Bài toán đơn giản, không cần phải tìm thuật toán, thuật toán nằm ngay trong
đề bài
- Var x, y: Integer;
Writeln(‘nhapx:’);Read(x);
Writeln(‘nhapy:’);Read(y);
Writeln(‘Tong la:’ , x+y);
Writeln(‘Tong la:’ , x-y);
Writeln(‘Tong la:’ , x/y);
Writeln(‘Tong la:’ , x Mod y);
Writeln(‘Tong la:’ , x Div y);
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
Viết chương trình nhập vào hai số và tính tổng, hiệu, tích, Div, Mod, thương của nó?
Program Cacpheptinh; Uses Crt;
Var x, y: Integer;
Begin Clrscr;
Writeln(‘nhap x:’);Read(x); Writeln(‘nhap y:’);Read(y); Writeln(‘Tong la:’ , x+y); Writeln(‘Tong la:’ , x-y); Writeln(‘Tong la:’ , x/y); Writeln(‘Tong la:’ , x Mod y);
Writeln(‘Tong la:’ , x Div y);
Readln;
End
4 Củng cố, dặn dò:
* 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
- Hs trả lời một số câu hỏi của GV đặt ra
9’
TG
Hoạt động 2: Tìm hiểu chương trình nhập vào hai số
và tính tổng, hiệu, tích, Div, Mod, thương của nó
15’
Trang 3Yêu cầu hs lần lượt trả lời, nhận xét
* Dặn dò:
- 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
- Hs trả lời và nhận xét từng câu hỏi của GV