Giáo án Tin học 8 - Tuần 17 - Đoàn Thị Ánh Nguyệt

Tuần 17
Tiết 33: ôn tập
I/Mục đích, yêu cầu:
 Kiến thức: Củng cố kiến thức về kiểu dữ liệu, sử dụng biến trong chương trình, cấu trúc câu lệnh điều kiện.
2. Kĩ năng: Viết đúng các lệnh, thành thạo trong việc khai báo biến, sử dụng câu lệnh điều kiện chính xác.
3. Thái độ: Giáo dục tính kiên trì say mê trong học tập
II/ Chuẩn bị của học sinh và giáo viên:
GV: Bài tập 
HS: nghiên cứu trước bài
III/ Tiến trình dạy học:
1. Bài mới:
Hoạt động của GV + HS
Nội dung ghi bảng
Hoạt động 1: Đọc bài toán, tìm lỗi.
Đọc bài toán.
Liệt kê các lỗi có trong chương trình và chữa lại cho đúng.
Var a:= integer;
 b: Real;
Const c:= 3;
Begin
a := 200
b= a/c;
Writr(b)
Readln
End.
Gọi HS lên bảng làm.
Bài 2:
Sau mỗi cõu lệnh sau đõy 
a) IF ( 45 mod 3) = 0 then 
X:= X + 1;
b) IF x > 10 then
X:= X + 1;
Giỏ trị của biến X là bao nhiờu, nếu trước đú giỏ trị của X bằng 5?
Bài 1: Chữa lại
Var a: integer;
 b: Real;
Const c= 3;
Begin
a := 200;
b:= a/c;
Writr(b);
Readln
End.
a) Giỏ trị của biến X = 6
b) Giỏ trị của biến X = 5
Hoạt động 2: Viết chương trình
Viết chương trỡnh kiểm tra số nguyờn dương A nhập từ bàn phỡm là số chẵn hay số lẻ.
- Cú bao nhiờu biến trong chương trỡnh?
- Làm thế nào để biết số nguyờn dương A là số chẵn hay số lẻ.
- Yờu cầu học sinh viết chương trỡnh.
Cú 1 biến là biến A cú kiểu dữ liệu là Integer.
+ Để kiểm tra số nguyờn dương A là số chẵn hay số lẽ, ta lấy số đú chia cho 2 và lấy phần dư. Nếu phần dư bằng 0 thỡ A là số chẵn, ngược lại A là sụ lẻ.
+ Viết chương trỡnh theo sự hướng dẫn của giỏo viờn.
Program Kiem_tra_so_chan_le;
Var A: Integer;
Begin
Writeln(‘Nhap so A:’); 
Readln(a);
If A mod 2 = 0 then
Writeln(A,’la so chan’) Else
Writeln(A,’la so le’);
Readln;
End.
Củng cố:
 Ôn các nội dung đã học và xem lại các bài tập đã giải.
- Chuẩn bị tiết sau kiểm tra thực hành (1tiết).
Tiết 34: Kiểm tra thực hành
I/Mục đích, yêu cầu:
- KT: Học sinh tái hiện lại những kiến thức về cấu trúc chung của 1 chương trình.
- KN: Học sinh chữa lỗi của một chương trình, dịch chương trình và chạy chương trình.
- Thái độ: Nghiêm túc trong thực hành và quản lý phòng máy.
II/ Đề ra:
đề 1
Dịch và chạy chương trình sau, sau đó lưu lại với tên của mình (VD: NAM8_1):
Pogram S Hinh_Tron;
Var 	R:= Integer;
S: Real;
Cnst 	PI := 3.14;
Begin 
	Write(Nhap ban kinh hinh tron R=: ') Readln(R);
	If (R>0) then
begin
S:= PI*RR;
	Write('Dien tich hinh tron la: ' S);
end
Else (‘Ban nhap sai roi); readln
End.
đề 2
Dịch và chạy chương trình sau, sau đó lưu lại với tên của mình (VD: NAM8_1):
Program Hoc luc;
Var 	a: Real;
Begin 
	Wrte(‘Nhap diem tong ket: ') Readln(a)
	If (a<5) then writeln(‘Hay co len, ban hoc yeu roi’);
Ese If (a>5)and (a<=6.5) then writeln(‘Ban hoc trung binh’)
Else If (a>=6.5)and (a<7,9) then writel(‘Ban hoc kha)
Else	Writeln(‘Ban hoc gioi qua’); readln
End.
Đáp án - biểu điểm
Mỗi bài có 9 lỗi, chữa đúng mỗi lỗi cho 1 điểm. 
Lưu bài cho 1 điểm.
Tổ chuyên môn ký duyệt ngày / 12 / 2009
TTCM
	Nguyễn Thị An