ĐỀ KIỂM TRA
Thời gian: 15 phút
I. Mục tiêu đánh giá
Đánh giá kết quả tiếp thu chương V của học sinh
II. Yêu cầu của đề
- Kiến thức: Biết vai trò của kiểu dữ liệu tệp; cách phân loại tệp và các thao tác cơ bản
đối với tệp văn bản.
- Kỹ năng: Thực hiện các thao tác cơ bản khi làm việc với tệp.

Nội dung
Yêu cầu
Bài 14 Bài 15
Bài 16
Biết Câu 10 Câu 1,2,3,4,5,6,7
Hiểu Câu 8,9
Vận dụng Câu 11
III. Nội dung đề
A. Phần trắc nghiệm (7điểm)
Hãy khoanh tròn để chọn câu đúng nhất
Câu 1: Để khai báo biến tệp x, ta viết
a) Var x:text; b) Var x;text;
c) Var x.text; d) Var x text;
Câu 2: Để gắn biến với tệp có tên vanban.txt, ta viết:
a) assign(x;’vanban.txt’); b) assign(x,’vanban.txt’);
c) assign(x:’vanban.txt’); d) assign(x.’vanban.txt’);
Câu 3: Trước khi ghi dữ liệu vào tệp, ta phải mở tệp bằng thủ tục
a) Writeln(biến tệp); b) reset(biến tệp);
c) Write(biến tệp) d) Rewrite(biến tệp);
Câu 4: Trước khi đọc dữ liệu từ tệp đã gắn với một biến tệp, ta mở tệp bằng thủ tục
a) Rewrite(biến tệp); b) reset(biến tệp);
c) Write(biến tệp) d) Writeln(biến tệp);

5 – assign(f,Input.dat’); reset(f);
6 – While not eof(f) do
7 – mx:=21458;
8 – Begin
9 – If n>mx then begin mx:=n; k:=1end
10 – read(f,n);
11 – else if n=mx then inc(k);
12 – end;
13 – Close (f);
14 – Writeln(mx,’’,k)
15 – End.
a) Em hãy sắp xếp chương trình trên thành chương trình hoàn chỉnh.
b) Hãy cho biết chương trình trên thực hiện việc gì?
ĐÁP ÁN
A. Phần trắc nghiệm
Mỗi câu đúng được 0.7 điểm.
1 – a, 2 – b, 3 – d, 4 – d, 5 – c, 6 – a, 7 – b, 8 – d, 9 – b, 10 - c
B. Phần tự luận
Câu 11:
a) 1 – 3 – 2 – 4 – 5 – 7 – 6 – 8 – 10 – 9 – 11 – 12 – 13 – 14 -15.( 2,5 điểm)
b) Tìm max và cho biết số lần đạt max.(0.5)