- Yêu cầu học sinh gõ chương trình
Giai_PTB2 trong SGK.
- Quan sát và hướng dẫn việc soạn thảo chương trình của học sinh.
- Cú pháp khai báo tên chương trình:
Program <Tên chương trình>;
- Cú pháp khai báo thư viện:
Uses <Tên thư viện>;
- Khai báo hằng:
Const <Tên hằng> = <Giá trị>;
- Khai báo biến:
Var <Danh sách biến> : <Kiểu dữ liệu>; a) Gõ chương trình: Program Giai_PTB2; Uses Crt; Var a,b,c,d:real; x1,x2:real; BEGIN Clrscr; Write('Nhap a, b, c, d:');
- GV yêu cầu học sinh lưu lại chương trình vừa soạn thảo với tên
PTB2.PAS lên đĩa.
- Yêu cầu học sinh dịch, kiểm tra và sửa lỗi của chương trình (nếu cĩ). - GV yêu cầu học sinh chạy thử chương trình với các bộ đầu vào đã cho trong SGK và quan sát kết quả nhận được.
- GV yêu cầu HS chạy lại chương trình với bộ đầu vào khác (1, 0, -2). - Sửa lại chương trình trên sao cho khơng dùng biến trung gian D. Thực hiện chương trình với các bộ dữ liệu như trên.
- Sửa lại chương trình nhận được ở câu c) bằng cách thay đổi cơng thức tính x2 (cĩ 2 cách để tính x2).
- Chạy chương trình với các bộ đầu vào đã cho trong mục h và I, quan sát kết quả nhận được. readln(a,b,c,d); d:=b*b-4*a*c; x1:=(-b-sqrt(d))/(2*a); x2:=-b/a-x1; Write('X1=',x1:6:2,'X2:=',x2:6:2); Readln; End.
b) Nhấn phím F2 và lưu chương trình với
tên là PTB2.PAS lên đĩa.
c) Nhấn phím Alt + F9 để dịch và sửa lỗi cú
pháp (nếu cĩ).
d) Nhấn phím Ctrl + F9 để thực hiện
chương trình. Nhập các giá trị 1; -3; 2. Quan sát kết quả trên màn hình (x1=1.00; x2=1.41).
e) Nhấn tổ hợp phím Ctrl + F9 rồi nhập các
giá trị 1; 0; -2. Quan sát kết quả hiện trên màn hình (x1=-1.41; x2=1.41).
f) Thay đoạn chương trình
d:=b*b-4*a*c;
x1:=(-b-sqrt(d))/(2*a); bằng đoạn chương trình:
x1:=(-b-sqrt(sqr(b)-4*a*c))/(2*a); Thực hiện lại chương trình với bộ dầu vào trên.
g) Sửa lại cơng thức tính
x2:= (-b+sqrt(sqr(b)-4*a*c))/(2*a);
h) Thực hiện chương trình đã sửa với bộ dữ
liệu1; -5; 6. Quan sát kết quả hiện trên màn hình (x1=2.00 x2=3.00).
i) Thực hiện chương trình với bộ dữ liệu 1;
1; 1 và quan sát kết quả trên màn hình.
3. Củng cố:
Khởi động Tubo Pascal, soạn thảot, lưu trữ, dịch và thực hiện chương trình.
4. Bài tập về nhà:
Ngày soạn: Tiết CT: 12
Tiết 12: KIỂM TRA 1 TIẾT HỌC KỲ I I. MỤC TIÊU:
Đánh giá lại khả năng tiếp thu kiến thức của học snh.