đề thi tin học 8 HK II

ĐỀ KIỂM TRA CHẤT LƯỢNG HKII
Môn: Tin học Khối 8
Thời gian: 45 phút (k
0
kể phát đề)
Điểm Chữ ký của giám thị
Số Chữ Chấm thi Coi thi
I. TRẮC NGHIỆM: (7 điểm) Mỗi câu 0,5 điểm
Khoanh tròn đáp án đúng:
1. While . . . do . . . là:
a. vòng lặp xác định b. một khai báo
c. câu lệnh điều kiện d. vòng lặp không xác định
2. Để xuất dữ liệu từ mảng a có 5 phần tử các số nguyên từ 1 đến 5 thì ta viết lệnh
như sau:
a. writeln(a); b. for i:= 1 to 5 do writeln(a[i]);
c. writeln(a[i]); d. writeln(a[1 5]);
3. Để nhập dữ liệu vào mảng a có 11 phần tử là các số nguyên từ 5 đến 15 thì ta viết
lệnh như sau:
a. Readln(a); b. Readln(a[5 15]);
c. Readln(a[i]); d. for i : = 5 to 15 do Readln(a[i]);
4. For . . . To . . .Do . . . là:
a. vòng lặp xác định b. một khai báo
c. câu lệnh điều kiện d. vòng lặp không xác định
5. Biểu tượng phần mềm Quan sát hình không gian là:
a. b. c. d.
6. Biểu tượng của phần mềm học vẽ hình là:
a. b. c. d.
7. Khi soạn thảo xong một chương trình Pascal, khi muốn kiểm tra xem có lỗi gì
không thì ta nhấn phím:
a. F9 b. F3
c. F2 d. F1

8. Để chạy một chương trình Pascal không còn lỗi, thì ta nhấn hợp phím:
a. F9 b. Ctrl + F9
c. F2 d. Ctrl + F2
9. For i:= 1 to 5 do writeln(i); có nghĩa là:
a. Lệnh gán i bằng 1
b. Lặp lại công việc xuất biến i từ 1 đến 5
c. Câu lệnh sai
d. Lặp lại công việc xuất biến i từ 5 đến 1
10.Để nhập giá trị vào phần tử a[3] của mảng a thì ta viết là:
a. Readln(a); b. Readln(a[i]);
c. Readln(a[3]); d. Readln(a(3));
Họ và tên:

Lớp:
Phòng GD&ĐT Tam Nông
Trường THCS Phú Thành A
11.Khai báo mảng a có 11 phần tử là các số nguyên từ 5 đến 15 thì ta khai báo như
sau:
a. a:Array[1 11] of integer; b. a:Array[5…15] of integer;
c. a:Array[11] of integer; d. a:Array[5 15] of integer;
12.Viết biểu thức a[3]*b[6] trong Pascal có ý nghĩa là:
a. Cho ta kết quả 3*6=18
b. Cho ta kết quả giá trị a[3] nhân với giá trị b[6]
c. Cho ta kết quả biến a nhân với biến b
d. Cho ta kết quả mảng a nhân với mảng b
13. If . . . then . . . là:
a. vòng lặp xác định b. một khai báo
c. câu lệnh điều kiện d. vòng lặp không xác định
14. Để tìm giá trị nhỏ nhất của 2 số a, b thì ta viết:
a. Min := a; if b < Min then Min := b;

b. If (a >b) then Min := a; if (b < a) then Min := b;
c. Min := b; if a > Min then Min := a;
II. TỰ LUẬN: (3 điểm)
1. Lập trình tính tích các số nguyên dương chẵn trong dãy a gồm 15 phần tử? (1điểm)
2. Viết chương trình tìm và in ra màn hình các số nguyên âm chẵn của n số nguyên?
(1điểm)
3. Cho biết ý nghĩa các câu lệnh sau: (1điểm)
a. var a:array[1 10] of real;
b. if i mod 2 = 0 then writeln(‘i la so chan’);
BÀI LÀM



















MA TRẬN ĐỀ

Bài
Mức độ
Bài 7 Bài 8 Bài 9 GeoGeBra Yenka
Biết I. 13,4 I. 1 I. 10 I. 6 I. 5
Hiểu II. 3.b; I. 14 II. 3.a; I.
3,11,12
Vận dụng II. 1,2; I. 7,8
ĐÁP ÁN
I. TRẮC NGHIỆM:
Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14
Đáp án d b d a a b a b b c d b c a
II. TỰ LUẬN:
1. var i, s : integer;
a: Array[1 15] of integer;
Begin
s: = 0;
for i := 1 to 15 do s := s + a[i];
writeln(‘tong gia tri cac phan tu trong day a la:’, s);
readln;
End.
2. var i, n: integer;
Begin
for i := 1 to n do
if (i mod 2 = 0 and i < 0) then
writeln(‘so nguyen am le la:’, i);
readln;
End.
3. a. var a : array[1 10] of real; khai báo biến a thuộc dãy gồm 10 phần tử và thuộc
kiểu số thực.
b. if i mod 2 = 0 then writeln(‘i la so chan’); tìm và in ra màn hình số chẵn