Kiểm tra môn: Tin học 8 thời gian: 45 phút

TRÖÔØNG THCS SÔN HAÏ
Hoï vaø teân: ………………………………………
Lôùp: ……………………………………………………
KIEÅM TRA
Moân: Tin hoïc 8
Thôøi gian: 45 phuùt
Ñieåm:
Lôøi pheâ: ………………………………………………………………………
…………………………………………………………………………………………
…………………………………………………………………………………………
ĐỀ KIỂM TRA
A. Phần trắc nghiệm: (4 điểm- mỗi câu 0,5 điểm) Hãy chọn một đáp án đúng nhất.
Câu 1. Máy tính có thể hiểu được trực tiếp ngôn ngữ nào trong các ngôn ngữ dưới đây?
A. Ngôn ngữ tự nhiên;	B. Ngôn ngữ lập trình;
C. Ngôn ngữ máy;	D. Tất cả các ngôn ngữ nói trên.
Câu 2. Những từ có ý nghĩa được xác định từ trước và không được phép sử dụng cho mục đích khác được gọi là:
A. Tên;	B. Từ khóa;	C. Tên riêng;	D. Biến.
Câu 3. Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?
A. Dientich;	B. 12A1;	C. Begin;	 	D. Bai tap.
Câu 4. Để chạy chương trình trong ngôn ngữ lập trình Pascal ta sử dụng tổ hợp phím nào sau đây?
A. F9;	B. Alt + F9;	C. Ctrl + F9;	D. Ctrl + Shitf + F9
Câu 5. Biểu thức toán học chuyển sang biểu thức trong Pascal như thế nào?
	A. 9 - ( 5 + 3)/4 + 7 – 2 + 4 + 25/5;	B. (9 – 5 + 3)/(4 + (7 - 2)) + 4 + 25/5;
	C. 9 – 5 + 3/(4 + (7 - 2)) + 4 + 25/5;	D. 9 - (5 + 3)/(4 + (7 - 2)) + 4 + 25/5.
Câu 6. Biểu thức 8+(10-3) div 2 có kết quả là bao nhiêu? 
A. 10;	B. 11;	C. 12;	D. 7.
Câu 7. Trong Pascal, câu lệnh khai báo nào sau đây là đúng?
A. Var tb: real;	B. Var x := integer;	C. const x = real;	D. Var R = 30; 
Câu 8. Trong Pascal, giả sử x là biến kiểu số nguyên. Phép gán nào sau đây đúng?
	A. x := 30;	B. x := a/b;	C. x := 20.5;	D. x := ‘Ket qua’;	
B. Phần tự luận: ( 6 điểm)
Câu 1. (2 điểm) Viết các biểu thức toán học sau đây dưới dạng biểu thức trong Pascal.
a. ;	b. ;
Câu 2. (2 điểm) Cho các câu lệnh sau:
	x : = 5;	y := x + 2;	z := y + x;
	S := x + y + z;
	T := z/4;
	Hãy cho biết sau khi thực hiện các câu lệnh trên giá trị của S, T lần lượt bằng bao nhiêu?
Câu 3. (2 điểm) Chương trình bạn Tuấn viết sau đây có lỗi ở một số câu lệnh, em hãy sửa lại các câu lệnh có lỗi cho hoàn chỉnh.
Program tinh tong;
Uses crt;
Var a, b, tong = integer;
Begin
Clrscr;
Write(‘Nhap so a = ‘); Readln(a);
Write(‘Nhap so b = ‘); Readln(b);
tong = a + b;
Writeln(Tong cua hai so a va b la: ,tong);
Readln;
End. 
BÀI LÀM