kt1tietkhoi11

KIỂM TRA 1 TIẾT Môn: Tin học Họ và tên:…………………………… Lớp:………… Đề: 1 Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 A                     B                     C                     D                     I. TRẮC NGHIỆM Câu 1 : Khái báo mảng một chiều nào sau đây là đúng: A. Type.dayso=array[1 250] of Integer; Var dayso:A; B. Var dayso=array[1 250] of Integer; C. Type dayso=array[1 250] of Integer; Var A: dayso; D. Type dayso: array[1 250] of Integer; Var dayso; Câu 2 : Phát biểu nào sau đây không đúng? A. Mảng một chiều là một dãy hữu hạn các phần tử cùng kiểu B. Xâu là một dãy các ký tự trong bộ mã ASCII C. Mảng hai chiều là một dãy hữu hạn các phần tử cùng kiểu D. Mảng hai chiều là một bảng các phần tử cùng kiểu Câu 3 : Var A:array[1 366] of Integer; Câu lệnh trên thực hiện công việc: A. Khai báo trực tiếp mảng một chiều gồm 366 phần tử nguyên. B. Khai báo gián tiếp mảng một chiều gồm 366 phần tử nguyên C. Khai báo gián tiếp mảng một chiều gồm 366 phần tử nguyên dương. D. Khai báo trực tiếp mảng một chiều gồm 366 phần tử nguyên dương. Câu 4 : A. Xuất giá trị các phần tử mảng A một chiều B. Nhập vào giá trị các phần tử mảng A hai chiều C. Xuất giá trị các phần tử mảng A hai chiều D. Nhập vào giá trị các phần tử mảng A một chiều Câu 5 : S = 'Xin chao' A. Length(S) = 12; B. Length(S) = 8; C. Length(S) = 16; D. Length(S) = 13; 1 Câu 6 : IF Length(a) > Length(b) Then write(a) else write(b); A. So sánh độ dài của xâu a và xâu b, nếu xâu a dài hơn b thi in xâu a ra ngược lại thì in xâu b B. So sánh độ dài của b và a, nếu xâu a dài hơn b thi in xâu a ra ngược lại thì in xâu b C. So sánh độ dài của xâu a và xâu b, nếu xâu a dài hơn b thi in xâu a ra ngược lại thì in xâu a D. So sánh độ dài của xâu a và xâu b, nếu xâu a dài hơn b thi in xâu b ra ngược lại thì in xâu a Câu 7 : Type Bang = array[1 9,1 9] of integer; Var A: Bang; A. Khai báo trực tiếp mảng 2 chiều gồm 9 phần tử nguyên dương. B. Khai báo gián tiếp mảng một chiều gồm 9 phần tử nguyên dương. C. Khai báo gián tiếp mảng 2 chiều gồm 81 phần tử nguyên D. Khai báo trực tiếp mảng một chiều gồm 9 phần tử nguyên Câu 8 : S = 'Truong*THPT*Tra On'; Copy(S,7,6); A. S= ' *THPT*' B. S= 'THPT* ' C. S= '*THPT* D. S= '*THPT*' Câu 9 : A. Xuất giá trị các phần tử mảng A một chiều B. Nhập vào giá trị các phần tử mảng A hai chiều C. Xuất giá trị các phần tử mảng A hai chiều D. Nhập vào giá trị các phần tử mảng A một chiều Câu 10 : Khai báo nào sau đây là đúng? A. var hoten:string[27]; B. var diachi: string(100); C. var hoten=string[30]; D. var ho=string(20); Câu 11 : Trên các dữ liệu kiểu xâu có các phép toán nào? A. phép toán so sánh và phép gán B. phép so sánh và phép nối C. phép gán và phép nối D. phép gán, phép nối và phép so sánh Câu 12 : Số phần tử của mảng 1 chiều là: A. vô hạn B. có giới hạn C. có nhiều nhất 100 phần tử D. có nhiều nhất 1000 phần tử Câu 13 : Xâu ‘bbaa’ bằng xâu A. ‘A’ B. ‘B’ C. ‘BBAA’ D. Cả 3 đều sai 2 Câu 14 : A. Đổi chỗ A[i] với A[i+1] B. Sắp xếp mảng một chiều A thành giải giảm C. Sắp xếp các chỉ số i của mảng một chiều A thành giải giảm D. Sắp xếp mảng một chiều A thành giải không giảm Câu 15 : S = 'Lop 11a5 de thuong' Delete(S,1,3); A. S= '11a5 de thuong' B. S= ' 11a5 de thuong' C. S= '11a5de thuong' D. S= ' 11a5dethuong' Câu 16 : Var s :String; A. Khai báo xâu s không đúng B. Khai báo xâu s có độ dài 0 ký tự C. Khai báo xâu s có độ dài 256 ký tự D. Khai báo xâu s có độ dài 255 ký tự Câu 17 : Để khai báo mảng 1 chiều cần: A. Mô tả kiểu của các phần tử B. Mô tả số lượng phần tử C. Mô tả kiểu của các phần tử và cách đánh số các phần tử của nó D. Mô tả cách đánh số của các phần tử của nó Câu 18 : Trong ngôn ngữ lập trình pascal, trong quá trình nhập dữ liệu của mảng một chiều, để giá trị i cũng tăng theo phần tử thứ i ta viết như sau: 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 19 : Xét chương trình sau: Var I, s: integer; Begin S:=0; For i:=1 to 5 do I mod 2=1 then s:=s+1; Writeln(s); End. Kết quả chương trình trên là: 3 A. 0 B. 2 C. 3 D. 5 Câu 20 : Hàm length(s) cho giá trị là: A. độ dài của xâu s B. kí tự đầu tiên của xâu s C. kí tự cuối càng của xâu s D. kí tự có số thứ tự nhỏ nhất trong xâu s II. TỰ LUẬN (5 điểm) Câu 1 : (3 điểm) Viết chương trình nhập vào mảng 1 chiều các số nguyên rồi rồi in ra màn hình: a. Giá trị trung bình của các phần tử của mản b. Đếm số phần tử có giá trị lớn hơn giá trị trung bành Câu 2 : Điền vào chỗ trống (…) trong bảng sau: Giá trị st Biểu thức Kết quả ‘Lop 11A5’ Length(st) ………. ‘Hom nay kiem tra 1 tiet’ Pos(‘nay’, st) ………. 4