Kiểm tra 1 tiết tiết 35

Họ và tên:…………………….
Lớp:………….
ĐỀ KIỂM TRA 1 TIẾT
MÔN Tin Học 11
Thời gian làm bài: 45 phút;
I. Phần trắc nghiệm: (4đ)(Chọn phương án đúng nhất) Mã đề thi 135
Câu 1: Để truy cập vào các trường của bản ghi ta viết:
A. <tên biến bản ghi>.<giá trị của trường> B. <tên kiểu bản ghi>.<tên trường>
C. <tên biến bản ghi>.<tên trường> D. <tên kiểu bản ghi>.<giá trị của trường>
Câu 2: Sau khi thực hiện đoạn chương trình dưới giá trị của biến S là:
S:= ‘Ha Noi mua thu’ ;
Delete(S,7,8);
Insert(’Mua thu ’,S,1);
A. Mua thuHa Noi B. Ha Noi mua thu
C. Mua thu Ha Noi D. Ha Noi
Câu 3: Khai báo nào sau đây là đúng ?
A. Type a = array(1..100) of integer; B. Type a:array[1..00] of integer;
C. Type a=array[1..100] of integer; D. a và b đúng.
Câu 4: Hàm length(s) cho biết:
A. Độ dài tối đa của xâu
B. Độ dài thực có của xâu
C. Độ dài thực có của xâu không kể các dấu cách
D. Tất cả đều sai
Câu 5: Nếu A, B là biến bản ghi có 3 trường (hoten, lop, diem). Câu lệnh nào sau sai:
A. write(a); B. A:=B; C. readln(a.diem) D. A.lop:=’11b1’;
Câu 6: Trong ngôn ngữ lập trình Pascal, xâu ký tự là:
A. Tập hợp các chữ cái tiếng Anh B. Tập hợp các chữ cái và chữ số tiếng Anh
C. Dãy các kí tự trong bảng mã ASCII D. Mảng các kí tự
Câu 7: Trong quá trình nhập dữ liệu cho biến mảng một chiều. Cách viết nào sau là đúng:
A.. write(‘a[i]=’); readln(a[i]); B. write(‘a[‘,i,’ ]=’); readln(a[i]);
C. write(“a[“,i,” ]=”); readln(a[i]); D. write(‘a[‘i’]=’); readln(a[i]);

Câu 8: Nếu khai báo Var s: tring; thì biến s nhận xâu có độ dài tối đa là:
A. 255 B. 225 C. 250 D. Tất cả đều sai
Câu 9: Trong ngôn ngữ lập trình pascal, với xâu kí tự ta có thể:
A. Gán một kí tự cho biến xâu B. Gán biến xâu cho biến xâu
C. So sánh hai xâu D. tất cả cá ý trên.
Câu 10: Var A,B: array[1..5] of byte;
C: array[1..5] of char;
Câu lệnh nào sau đây là hợp lệ:
A. B:=C; B. A:=B; C. A:=C; D. tất cả đều sai
II. Phần tự luận: (6đ)
Câu 1: (1đ) Lấy ví dụ về khai báo gián tiếp cho từng kiểu dữ liệu có cấu trúc sau: mảng một chiều, xâu.
Câu 2: (1 đ) Đoạn chương trình sau có ý nghĩa gì?
Readln(s); { s là biến xâu}
For i:=1 to length(s) do s[i]:=upcase(s[i];
Câu 3: (2đ) Viết chương trình nhập vào một xâu kí tự s từ bàn phím. Hãy đếm xem có bao nhiêu kí tự
chữ cái thường trong xâu s, rồi thông báo kết quả lên màn hình?
Câu 4:(2đ) Hãy nhập vào một mảng A gồm họ tên của N học sinh trong lớp (N<=50). Sau đó hiển thị
họ tên của học sinh có độ dài lớn nhất trong lớp.?
-----------------------------------------------
----------- HẾT ----------
Trang 1/1 - Mã đề thi 135