De thi hoc ky 2 mon tin 11

Kiểm tra học kỳ 2 - Năm học 2011-2012
Môn: Tin học lớp 11
Thời gian: 45 phút

Họ tên học sinh: . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Lớp:.................
Học sinh chọn đáp án đúng vào mẫu sau mỗi câu trả lời đúng 0.4 điểm
Câu
1
2
3
4
5
6
7
8
9
10

Đáp án












Mã đề: 148

 Câu 1. Chọn câu đúng trong các phép so sánh xâu sau đây
A. `Hoang Van Thu`>`Truong Hoang Van Thu`
B. `Chuc Mung Nam Moi` >`Chuc Mung Sinh Nhat`
C. `Anh`<`anh`
D. `Ngay` <`Dem`
Câu 2. Cho các thao tác sau đây vể tệp văn bản
(1) Mở tệp để ghi dữ liệu ;
(2) Khai báo và gán tên tệp với biến tệp;
(3) Đóng tệp; (4) Mở tệp để đọc dữ liệu;
(5) Ghi dữ liệu; (6) Đọc dữ liệu;
Để mở tệp để đọc thì thực hiện theo thứ tự nào sau đây
A. (2)  (5)  (4)  (3);
B. (1)  (2)  (4)  (3);
C. (2)  (6) 1)  (4);
D. (2) 4)  (6)  (3);
Câu 3. Thực hiện lệnh găn tệp văn bản chúng ta sử dụng lệnh nào sau đây
A. Assign(,);
B. Rewrite()
C. Assign(,);
D. Reset()
Câu 4. Cho xâu s:=`Hoang Van Thu` lệnh gán x:=length(s) thì x sẽ nhận giá trị
A. 10 B. 13
C. 11 D. 12
Câu 5. Muốn có biến mảng A gồm các số nguyên khai báo nào sau đây là sai
A. var A: array[1..100]: Integer;
B. var A: array[1..100]of byte;
C. var A: array[1..100]of Integer;
D. var A: array[1..100]of word;
Câu 6. Cho đoạn chương trình
x:= 5; for i:=1 to 7 do if i mod 2=0 then x:=x + i;
Kết thúc đoạn chương trình x nhận giá trị
A. 7 B. 12
C. 15 D. 17
Câu 7. Trong các hàm sau hàm nào cho kết quả là một xâu
A. Pos(s1,s2) B. Copy(s,2,3)
C. Insert(s1,s2,2) D. Length(s)
Câu 8. Cho đoạn chương trình sau đây (giả sử A là mảng đã được khai báo)
S:=0; Dem:=0; For i:=1 to n do if A[i] >0 then
Begin S:=S+A[i]; Dem:=dem+1; end;
TB:=S/Dem;
Đoạn chương trình trên thực hiện
A. Tính trung bình các phần tử âm trong mảng A
B. Tính tổng các phần tử dương trong mảng A
C. Tính trung bình các phần tử dương mảng A
D. Đếm các phần tử dương trong mảng A
Câu 9. Muốn khai báo f là tệp văn bản ta thực hiện
A. Var f: Van Ban; B. Var f : Text;
C. Var f: Byte; D. Var f : Char;
Câu 10. Để thực hiện mở tệp để ghi chúng ta sử dụng lệnh
A. Write(, )
B. Read(, )
C. Rewrite()
D. Reset()
Tự luận:
Câu 1: (2 điểm) Viết chương trình nhập vào từ bàn phím mảng 1 chiều gồm n phần tử (n<=200) kiểu nguyên, ghi các phần tử là số nguyên tố vào tệp NT.TXT.
Câu 2: (2 điểm) Viết chương trình nhập vào 1 xâu không quá 200 ký tự , đếm trong xâu có bao nhiêu ký tự hoa (ví dụ xâu: Hoàng Văn Thụ có 3 ký tự hoa)
Câu 3: (2 điểm) Viết chương trình con tìm ước chung