Ktra 45p ki2

Đề: 001 Kiểm tra 45 phút
Môn: Tin học - 11

Họ và tên:……………………………….
Lớp:…………….

1. Khai báo nào sau đây là đúng cú pháp A. Type mang = array [1..100] of byte; B. Type mang1c = array [1-100] of byte; C. Type mang1c = array (1..100) of byte; D. Type mang1c = array [1…100] of byte; 2. Nếu khai báo biến a:array[1..100,1..100] of integer thì việc truy xuất đến phần tử nào là đúng A. a[i,j] B. a[i;j] C. a[i][j] D. a[i],[j] 3. Đoạn chương trình sau khi thực hiện cho kết quả gì
Var a:array[1..3] of byte; i:byte; Begin For i:=1 to 3 do a[i]:=i; For i:=1 to 3 do If a[i] mod 2 = 0 then Write(a[i]); End. A. 2 B. 1 C 1 2 3 D. 3 4.Trong Pascal, để xuất các phần tử của mảng 2 chiều ta dùng mấy vòng For? A. 3 B. 2 C. 1 D. 0 5. Khai báo sau đây thì mảng có tối đa bao nhiêu phần tử?
Var a:array [1..10,2..5] of byte; A. 50 B. 40 C. 100 D. 30 6. Cách khai báo xâu nào là đúng? A. s : array[1..255] of char; B. s : File of String; C. s : char[256]; D. s : string[30]; 7. Một xâu có tối đa bao nhiêu kí tự? A. 64 B. 255 C. 128 D. 256 8. Xâu không có kí tự nào gọi là: A. Xâu không B. Xâu chứa khoảng trắng C. Xâu rỗng D. Không có loại xâu này 9. Phần tử đầu tiên của xâu là phần tử thứ: A. 1 B. Do người lập trình khai báo C. 0 D. Không có chỉ số  10. Khai báo nào sau đây là sai: A. s:string[1]; B. s:string[100]; C. s:string[256]; D. s:string;  11. a sẽ có kết quả là gì trong đoạn chương trình sau: a:=`tuoi hoc tro`; delete(a,9,4); A. xâu rỗng B. tuoi hoc C. hoc tro D. tuoi 12. a sẽ có kết quả là gì trong đoạn chương trình sau: a:=`tuoi hoc tro`; delete(a,1,length(a)); A. hoc tro B. xâu rỗng C. tuoi hoc D. tuoi 13. a sẽ có kết quả là gì trong đoạn chương trình sau: a:=`hoc tro`; b:=`tuoi`; insert(a,b,5); A. hoc tro B. hoc tuoi tro C. tuoi hoc tro D. Sai cú pháp14. Cho đoạn chương trình sau: a:=`Truong Dinh`; b:=`truong dinh` Phát biểu nào là đúng? A. a bằng b B. Không thể so sánh 2 xâu C. b lớn hơn a D. a lớn hơn b 15. Câu lệnh nào xóa kí tự cuối cùng của xâu a? A. delete(a,1,255) B. delete(a,1,length(a)) C delete(a,length(a),1) D. delete(a,255,1) 16. a:=`Truong Truong Dinh`; pos(`Truong`,a) cho giá trị là: A. 1 B. 2 C. 6 D. 5 17. Đoạn chương trình sau làm gì? For i:=length(a) downto 1 do write(a[i]); A. Viết ra kí tự đầu của a B. Viết ra kí tự cuối của a C. Viết xâu a theo thứ tự ngược D. Viết xâu a theo thứ tự 18 . Đoạn chương trình sau làm gì? k:=0; For i:=1 to length(a) do If a[i]=`a` then k:=