ĐỀ THI HKI

Họ và tên: …………………….
Lớp:
Thi học kì 1
Môn: Tin học- 8
Điểm:

Ma trận đề:

Chủ đề
Nhận biết
Thông hiểu
Vận dụng
Tổng


TNKQ
TL
TNKQ
TL
TNKQ
TL


Khái niệm ban đầu về chương trình và NNLT
C1,2,4,7

2


B2

2


5

4

Thực hiện tính toán với các kiểu dữ liệu


C6
0.5

C5
0.5

2
1

Sử dụng biến trong chương trình


C3
0.5
B1a
1


2
1.5

Thực hành viết chương trình


C8
0.5
B1b
1

C3
2
3
3.5

Tổng
4
2
6
5.5
2
2.5
12
10


Đề bài:
trắc nghiệm: (4đ)
khoanh tròn chữ cái đứng trước câu trả lời đúng nhất.
Câu 1: để khai báo tên chương trình ta dùng lệnh:
A. Program B. program C. PROGRAM D. Tất cả đề đúng
Câu: 2 Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?
A. Writeln(‘Nhập x = ’); B. Write(x);
C. Readln(x); D. Writeln(x);
Câu 3: Khi khai báo biến x có kiểu integer thì phép gán nào sau đây là hợp lệ?
A. x:=200 B. x:=’tinhoc’ C. x:=50000000 D. X:=1.112
Câu 4: Để dịch một chương trình Pascal ta nhấn tổ hợp phím:
A. Ctrl + S B. Alt + F9 C. Alt + F5 D. Alt + X
Câu 5 : Biểu thức toán học
trong NN Pascal được viết:
A. 12-5/4+6-2 B. (12-5)/(4+6-2) C. (12-5)/(4+6) -2 D. (12-5-2)/(4+6)
Câu 6: Kiểu dữ liệu stringcó độ dài tối đa là:
A. 512 B. 128 C. 255 D. 1024
Câu 7: Khi soạn thảo xong chương trình Pascal, ta muốn lưu chương trình lại thì ta nhấn phím:
A. F1 B. F3 C. F2 D. F4

Câu 8: Chọn câu lệnh Pascal hợp lệ trong các câu sau :
A. If x : = a + b then x : = x + 1;
B. If a > b then max = a;
C. If a > b then max : = a ; else max : = b;
D. If 5 = 6 then x : = 100;
II. Tự luận: (6đ)
Bài 1:
a. Viết câu lệnh khai báo biến x có kiểu số nguyên và biến y có kiêu thực bằng NNLT Pascal.
b. Viét câu lệnh sau trong NNLT Pascal:
“ Nếu a lớn hơn b thì viết số a ra màn hình, ngược lại thì viíet số b ra màn hình”,
Bài 2:
Vẽ cấu trúc,viết cú pháp và nêu ý nghĩa của câu lệnh rẽ nhánh dạng thiếu trong NNLT Pascal.
Bài 3:
Cho trước ba số dương a, b, và c. Hãy mô tả thuật toán xác định ba số đó có phải là độ dài ba cạnh của một tam giác?
Đáp án:
Trắc nghiệm: (4đ):
Mỗi câu đúng: 0.5đ.
Câu
1
2
3
4
5
6
7
8

Đáp án
D
C
A
B
B
C
C
D


Tự luận: (6đ).
Bài 1: 2đ
a. 1đ Var x: integer;
y: real;
b. 1đ If a> b then writeln(a) else writeln(b);

Bài 2: 2đ
Vẽ cấu trúc đúng: 1đ
Viết đúng cú pháp: 0.5đ
Trả lời đúng ý nghĩa: 0.5đ
Bài 3: 2đ
Viết đúng thuật toán gồm 5 bước