De thi hk2 tin 11

Kiểm tra học kỳ II - lớp 11
Môn: Tin học
Phần I: Trắc nghiệm ( 5 điểm):
Câu 1: Chương trình sau làm việc gì?
Var A: array[1..50] of byte;
Begin
For i:= 1 to 10 do write(A[i],’ ’);
Readln
End.
Câu 2: Để gán một tệp có tên là HOCKY2.INT cho biến tệp K2, ta phải gõ lệnh:
a. Assign(K2, hocky2.int); b. Assign(K2, ‘hocky2.int’);
c. Assign(hocky2.int, K2); d. Assignhocky2.int’, k2);
Câu 3: Số lượng phần tử của tệp
a. Không bị giới hạn mà chỉ phụ thuộc vào dung lượng đĩa b. Không được lớn hơn 255
c. Không được lớn hơn 128 d. Phải được khai báo trước.
Câu 4: Cho xâu s1=’abc’, s2=’cabdeabcfabcg’. Hỏi Pos(s1,s2)=?
a.2 b. 6 c. 7 d. 10
Câu 5: Cho xâu s=’abc123d567fgh89’. Hỏi Copy(s,2,5)=?
a. c123d b. 23 c. c123d d. bc123
Câu 6: Giả sử một tệp nào đó đã được gán cho biến tệp f. Khi ta mở lệnh bằng thủ tục ReWrite(f), thì:
a. Nội dung trong tệp sẽ hiện ra trên màn hình b. Nội dung trong tệp vẫn còn nguyên
c. Nội dung trong tệp nếu có sẽ bị xoá d. Tất cả đều sai.
Câu 7: Câu lệnh dùng thủ tục ghi có dạng:
a. Writeln(, ); b. Writeln(,();
c. Writeln(); d. Writeln();
Câu 8: Dữ liệu kiểu tệp:
a. được lưu trữ trên RAM b. chỉ được lưu trữ trên đĩa cứng
c. được lưu trữ trên ROM d. được lưu trữ trên bộ nhớ ngoài.
Câu 9: Thủ tục mở một tệp để đọc thông tin trong tệp là:
a. Rewrite(); b. Rewrite(); c. Reset(); d. Reset();
Câu 10: Đọc chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i div 3 = 2 then write(g, i);
Close(g);
Readln
End.
II. Tự luận (5đ)
Viết chương trình gồm các chương trình con làm các việc sau:
Nhập vào 1 xâu kí tự từ bàn phím (độ dài lớn nhất của xâu là 60) và 1 kí tự bất kỳ (kí hiệu là kí tự ch)
Đếm trong xâu có bao nhiêu kí tự ch.
Xoá hết các dấu cách trong xâu (nếu có).
Kiểm tra xâu có phải là xâu đối xứng hay không (xâu sau khi đã xoá dấu cách).
Kiểm tra 1 xâu a được nhập từ bàn phím có trong xâu nhập ở câu a hay không. Nếu có thì xâu a xuất hiện mấy lần.

Bài làm (ắc nghiệm)

Câu
1
2
3
4
5
6
7
8
9
10

Đ/án











 Kiểm tra học kỳ II - lớp 11
Môn: Tin học
Phần I: Trắc nghiệm ( 5 điểm):
Câu 1: Để gắn tệp KQ.txt