Trọn bộ giáo án 11 năm 2012-2013

Ngày soạn: 19/10/2012
Ngày dạy: 22/10/2012
Tiết 10/Tuần 10
BÀI TẬP THỰC HÀNH SỐ 1

I. Mục tiêu.
1. Về kiến thức:
- Biết được một chtrình Pascal hoàn chỉnh.
- Làm quen các dịch vụ chủ yếu của Turbo Pascal trong việc soạn thảo, lưu, dịch, thực hiện chtrình.
2. Về kỹ năng:
- Soạn thảo được chtrình, lưu lên đĩa, dịch lỗi cú pháp, thực hiện và tìm lỗi thuật toán và hiệu chỉnh.
- Bước dầu biết phântích và hoàn thành chtrình đơn giản trên Pascal
3. Về tư duy và thái độ:
Tự giác, tích cực và chủ động trong thực hành
II. Chuẩn bị.
- Giáo viên: - SGK, SGV, Giáo án.
- Học sinh: - SGK, Sách bài tập.
III. Phương pháp.
- Thuyết trình, diễn giải.
IV. Tiến trình lên lớp.
1. Ổn định lớp: Kiểm tra sĩ số lớp.
2. Kiểm tra bài cũ:
2HS làm độc lập: Cho M, N là 2 biến nguyên. Điều kiện xác định M, N đồng thời là số chẵn hoặc đồng thời là số lẻ được thể hiện trong Pascal như thế nào?
Đ/a: ((M mod 2 = 0) and (N mod 2 = 0)) Or ((M mod 2 =1) and (N mod 2 = 1))
3. Bài mới
1. Hoạt động 1: Kiểm tra bài cũ
Hoạt động của GV và HS
Nội dung

Viết chtrình nhập vào một số và tính bình phương của số đó.
Cho 2 hs xung phong lên bảng


Nhận xét, đánh giá, cho điểm
Chtrình đạt yêu cầu:
Var x, y: integer;
Begin
Write(‘nhap vao một so ’); readln(x);
Y:= sqr(y);
Write(y); readln
End.

2. Hoạt động 2: Tìm hiểu một chtrình hoàn chỉnh
a. Nội dung: Cho chương trình sau:
Program Giai_pt;
Uses crt;
Var a, b, c, d, x1, x2: real;
Begin
Clrscr;
Write(’nhap a b c ’); Readln(a, b, c);
D:= b*b-4*a*c;
X1:= (-b-sqrt(d))/(2*a);
X2:= (-b+sqrt(d))/(2*a);
Writeln(’x1=’,x1:6:2,’ x2=’,x2:6:2);
Readln
End.
b. Các bước tiến hành:
Hoạt động của GV và HS
Nội dung

1. Chiếu chtrình lên bảng. Y/cầu hs thực hiện các nhiệm vụ:
- Soạn chtrình vào máy
- Lưu chtrình
- Dịch lỗi cú pháp
- Thực hiện chtrình
- Nhập dữ liệu 1 -3 2. Thông báo kết quả
- Trở về màn hình soạn thảo
- Thực hiện chtrình
- Nhập dữ liệu 1 0 2. Thông báo kết quả.
- Vì sao có lỗi xuất hiện?
HS:
1. Quan sát chtrình, đọc lập soạn vào máy
F2
Alt+F9
Ctrl+F9
x1=1.00 x2=2.00
Enter
Ctrl+F9
Thông báo lỗi
Do căn bậc hai của một số âm
Program Giai_pt;
Uses crt;
Var a, b, c, d, x1, x2: real;
Begin
Clrscr;
Write(’nhap a b c ’);
Readln(a, b, c);
D:= b*b-4*a*c;
X1:= (-b-sqrt(d))/(2*a);
X2:= (-b+sqrt(d))/(2*a);
Writeln(’x1=’,x1:6:2,’x2=’, x2:6:2);
Readln
End.


V. Củng cố.
1. Nội dung đã học
Các bước để hoàn thành một chương trình: - Phân tích bài toán để xácđịnh dữ liệu vào/ra; xác định thuật toán; soạn thảo chtrình vào máy; lưu trữ chtrình; biên dịch chtrình; thực hiện và hiệu chỉnh chtrình
2. Câu hỏi, bài tập về nhà:
- Viết chương trình nhập vào độ dài 3 cạnh của một tam giác, tính chu vi, diện tích của tam giác đó.
V. Rút kinh nghiệm.
Ngày soạn: 26/10/2012
Ngày dạy: 29/10/2012
Tiết 11,12/Tuần 10,11
BÀI TẬP CHƯƠNG 2
(Tiết 1+2)

I. Mục tiêu.
1. Về kiến thức:
Biết