Giáo án Tin học 8 tiết 36: Kiểm tra học kỳ I

 Ngày soạn: 05/12/09	 	 tiết theo ppct: 36	 
 Ngày dạy: 09/12/09 
 Kiểm tra học kỳ I
I. Mục tiêu:
Đánh giá kiến thức, kỷ năng của học sinh về các nội dung đã hoc ở HKI
Qua đó có biện pháp để giúp đở các en có kết quả tốt hơn ở HKII
II. Chuẩn bị:
Gv: Đề ra
HS: ôn kĩ bài
III. tiến trình bài dạy:
1. Ma trận đề kiểm tra :
 Nội dung
Mức độ
Làm quen với chương trình và ngôn ngữ LT
Chương trình máy tính và dữ liệu
Sử dụng biến trong chương trình
Từ bài toán đến chương trình
Tổng điểm
Nhận Biết
3 câu
 1.5 điểm
1.5 đ
Thông Hiểu
4 câu
 3 điểm
6 câu
 3.5 điểm
6.5 đ
Vận dụng
1 câu
 2 điểm
2 đ
Tổng điểm
1.5 đ
3 đ
3.5 đ
2 đ
10 đ
2. ĐỀ BÀI: 
Phần I: trắc nghiệm: (5 đ) (HS chỉ được khoanh 1 đỏp ỏn)
Cõu 1: ẹeồ gaựn giaự trũ 12 cho bieỏn x ta duứng leọnh:
	A. x:12;	B. x:= 12;	C. x = 12;	D. x =: 12;
Cõu 2: ẹeồ khai baựo bieỏn x thuoọc kieồu soỏ thửùc ta khai baựo:
	A. Var x: Real;	B. Var x: String;	C. Var x: integer;	D. Var x: Char;
Cõu 3: Caõu leọnh cho pheựp ta nhaọp giaự trũ cuỷa a tửứ baứn phớm laứ:
A. Write(a);	B. readln(a);	
C. Writeln(a);	D. Write(‘nhap gia tri cua a:’);
Cõu 4: Bieồu thửực toaựn hoùc ủửụùc vieỏt dửụựi daùng bieồu thửực trong Pascal laứ:
	A. 12-5/4+6-2	B. (12-5)/(4+6)-2	C. (12-5-2)/(4+6)	D. (12-5)/(4+6-2)
Cõu 5: Haừy cho bieỏt keỏt quaỷ in ra maứn hỡnh sau khi thửùc hieọn caõu leọnh Writeln(‘16*2-3=’,16*2-3);
	A. 16*2-3=29	B. 16*2-3=	C. 29	D. 16*2-3
Cõu 6: Sau 2 caõu leọnh x:=5; x:=x*x; Giaự trũ cuỷa bieỏn x laứ:
	A. 15	B. 10	C. 25	D. 5
Cõu 7: Khi ta khai baựo bieỏn x coự kieồu laứ integer thỡ pheựp gaựn naứo sau ủaõy laứ hụùp leọ?
	A. x:= 5000000;	B. x:= 1.23;	C. x:= 200;	D. x:= ‘tin_hoc’;
Cõu 8: Caỏu truực chung cuỷa chửụng trỡnh goàm maỏy phaàn?
	A. 2 phaàn	B. 4 phaàn	C. 3 phaàn	D. 1 phaàn
Cõu 9: Teõn naứo laứ hụùp leọ trong pascal: 
	A. end	 B. 8hs
	C. dientichtamgiac	D. tam giac_
Cõu 10: Trong caực tửứ sau, tửứ naứo khoõng phaỷi laứ tửứ khoaự?
	A. End	B. Begin	C. Program	D. Ct_dau_tien
II. TL (5 ủieồm):
Caõu 1: (1 ủ) Vieỏt caõu leọnh khai baựo bieỏn x coự kieồu soỏ nguyeõn vaứ bieỏn y coự kieồu soỏ thửùc baống ngoõn ngửừ laọp trỡnh Pascal.
Caõu 2: (1 ủ) Vieỏt caực caõu leọnh in keỏt quaỷ cuỷa bieồu thửực ra maứn hỡnh.
Caõu 3: (1 ủ) Cho bieỏt keỏt quaỷ cuỷa caực leọnh sau:
writeln(100+200);
writeln(‘100+200 =’,150+150);
caõu 4: (1 ủ) Neõu yự nghúa cuỷa tửứng doứng leọnh sau:
 Var a,b: integer; ..
 Const c=4;	 ..	
 Begin 
 a:= 200;	 
 b:= a/c; 
 write(b); .
 end.
Caõu 5: (1 ủ) moõ taỷ thuaọt toaựn tỡm giaự trũ lụựn nhaỏt trong 5 soỏ: 12, 1, 6, 99, 55, 10, 20,30,40,100
ẹaựp aựn: 
Traộc nghieọm: 1- B; 2- A; 3- B; 4-B; 5-A; 6 – C;7- C; 8- A; 9- C; 10- D
Tửù luaọn:
Caõu 1: var x: integer;
 Y: real;
Caõu 2: writeln(‘5*5+(8-2)*2=’, 5*5+(8-2)*2);
Caõu 3: a. in ra maứn hỡnh soỏ 300
in ra maứn hỡnh: 100+200=300.
Caõu 4: 
Var a,b: integer; khai báo biến a và b có kiểu số nguyên.
 Const c=4;	 khai báo hằng c=4	
 Begin 
 a:= 200;	 gán 200 cho a
 b:= a/c; gán a/c cho biến b
 write(b); in giá trị của biến b ra màn hình
 end.
Câu 5: b1: max <- a1; I <- 1
 B2: I <- i+1
 B3: nếu 1>10 thì chuyển đến b5
 B4: nếu ai>max thì max <- ai và quay về b2
 B5: thông báo kq và kt.