Giáo án Tin học lớp 11 - Tiết 8: Bài tập và thực hành 1

Tiết PPCT: 8
Bài tập và thực hành 1
	Ngày soạn: 20/09/2007	Lớp dạy: A1, A2, A3, A4, A5
	Ngày đăng ký giáo án: .........................................
Người duyệt giáo án (TTCM duyệt, BGH duyệt):
...................................................................................................................................
...................................................................................................................................
I. Mục tiêu:
1. Kiến thức:
- Làm quen một chương trình Pascal đơn giản
- Làm quen với các dịch vụ chủ yếu của Turbo Pascal trong việc soạn thảo, lưu chương trình, dịch chương trình và thực hiện chương trình.
2. Kĩ năng:
- Soạn thảo chương trì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, hiệu chỉnh chương trình.
- Bước đầu biết viết, soạn thảo một chương trình đơn giản trên ngôn ngữ Turbo Pascal.
3. Thái độ:
Tự giác, tích cực và chủ động trong thực hành
II. Chuẩn bị:
1. Giáo viên:
- Chuẩn bị giáo án giảng dạy.
- Phòng máy, máy chiếu đa năng, cài đặt đầy đủ Turbo Pascal.
2. Học sinh:
Sách giáo khoa, bài tập.
III. Tổ chức dạy và học:
1. Hoạt động 1: Tìm hiểu một chương trình hoàn chỉnh
a. Mục tiêu; 
- Học sinh biết và soạn được một chương trình hoàn chỉnh
- Biết lưu, biên dịch và thực hiện chương trình.
- Biết tìm, sửa lỗi
b. Nội dung:
Cho chương trình sau:
	Program Giai_PTB2;
	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);
	Write(‘X1= ’, x1:6:2, ‘X2= ’, x2:6:2);
	Readln
	End.
c. Các bước tiến hành:
Hoạt động của giáo viên
Hoạt động của học sinh
1. Chiếu chương trình lên bảng. Yêu cầu HS thực hiện các nội dung sau:
- Soạn chương trình vào máy
- Lưu chương trình
- Dịch, kiểm tra lỗi cú pháp
- Thực hiện chương trì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 chương trình
- Nhập dữ liệu 1 3 4. Thông báo kết quả
H: Vì sao có lỗi xuất hiện
Sửa lại chương trình không dùng biến D
1. Quan sát màn hình.
Soạn thảo chương trình vào máy
ấn 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 2 của một số âm
Readln(a,b,c);
X1:= (-b-sqrt(b*b-4*a*c))/(2*a);
X2:= (-b+sqrt(b*b-4*a*c))/(2*a);
Write(‘X1= ’, x1:6:2, ‘X2= ’, x2:6:2);
IV. Củng cố
Nhắc lại một số chú ý khi soạn thảo chương trình
Các thao tác: lưu chương trình, dịch lỗi cú pháp, thực hiện chương trình.