- Rèn kỹ năng về đọc các chương trình đơn giản và hiểu được ý nghĩa của thuật toán sử dụng trong chương trình... Về thái độ.[r]
(1)PHỊNG GD&ĐT - THỊ XÃ ĐƠNG TRIỀU CÔNG NGHỆ THÔNG TIN
-o0o -GIÁO ÁN LÊN LỚP
MON-HOC: - LỚP 8
(2)KIỂM TRA TIẾT THỰC HÀNH
I MỤC TIÊU
1 Về kiến thức
- Nắm cấu trúc chương trình pascal, cách thể thuật toán câu lệnh write, readln, if then
2 Về kỹ năng
- Rèn kỹ đọc chương trình đơn giản hiểu ý nghĩa thuật toán sử dụng chương trình
3 Về thái độ
- Nghiêm túc giờ, tự giác làm
II CHUẨN BỊ CỦA GIÁO VIÊN VÀ HỌC SINH
1 Giáo viên
- Giáo viên: Giáo án, đề bài, phòng máy
2 Học sinh
- HS: học sinh chuẩn bị nhà III PHƯƠNG PHÁP
Kiểm tra thực hành máy, vấn đáp IV TIẾN TRÌNH GIỜ DẠY
1 Ổn định lớp (thời gian: phút):
2 Kiểm tra cũ:
3 Giảng mới:
NỘI DUNG THỜI GIAN
HOẠT ĐỘNG DẠY HỌC
GHI BẢNG Hoạt
động của giáo viên
Hoạt động của học sinh
Câu1: Viết chương trình giải phương trình bậc bx + c = Yêu cầu: gõ chương trình vào máy, dịch chương trình chạy chương trình với liệu khác - Lưu lại với tên tên +lớp+bài Câu 2: Cho số a, b
44 phút
G V chiế u để
H S t h ự c h i ệ
C â u : V i ế t chương trình g i ả i p h n g trình bậc Ngày soạn: 02/12/2017
Ngày giảng: 06/12/2017 Tiết thứ: 32
(3)Viết chương trình in số có giá trị lớn Yêu cầu: gõ chương trình vào máy, dịch chương trình chạy chương trình với liệu khác - Lưu lại với tên tên +lớp+bài Đáp án: Câu 1: điểm Program
giai_bat_ptrinh; Var b,c : integer; Begin Write (‘Nhap b : ‘); Readln (b); Write (‘Nhap c: ‘); Readln ( c); If b = then If c <> then write (‘ptvn’) Else write (‘ptvsn’) Else write (‘nghiem cua pt x=’, -c/b :8:3); Readln; End Câu2: điểm Program SLN; Var b,a : integer; Begin Write (‘Nhap a, b: ‘); Readln (a, b); If a
G V c h ấ m
n m y tính
bx + c = Yêu cầu: gõ chương trình vào máy, dịch chương trình c h y c h n g trình với liệu khác
- Lưu lại với tên tên +lớp+bài
Câu 2: Cho số a , b V i ế t chương trình in số có giá trị lớn
Y ê u c ầ u : g õ chương trình vào máy, dịch chương trình chạy chương trình với liệu khác
- Lưu lại với tên tên +lớp+bài
Đáp án: Câu 1: điểm P r o g r a m giai_bat_ptrinh ;
Var b,c : integer;
Begin
W r i t e (‘Nhap b : ‘); Readln (b); Write (‘Nhap c: ‘); Readln ( Ngày soạn: 02/12/2017
Ngày giảng: 06/12/2017 Tiết thứ: 32
(4)4 Củng cố:
5 Hướng dẫn tự học:
V RÚT KINH NGHIỆM
c);
If b = then
If c <> then write (‘ptvn’)
Else write (‘ptvsn’) Else write (‘nghiem cua pt x=’, -c/b :8:3); Readln; End Câu2: điểm Program SLN; Var b,a : integer;
Begin
W r i t e (‘Nhap a, b: ‘); Readln (a, b); If a<b
t h e n
writeln(‘gia tri lon nhat la’,b) e l s e writeln (‘giá trị lớn là’,a) Readln; End
Ngày soạn: 02/12/2017
Ngày giảng: 06/12/2017 Tiết thứ: 32