đề 1 kiểm tra 1 tiết trắc nghiệm 50 câu

ĐỀ KIỂM TRA 1 TIẾT 01. S1='1' S2='Hinh 1.2' A.Pos(S1,S2) = 5 B.Pos(S1,S2) = 6 C.Pos(S1,S2) = 7 D.Pos(S1,S2) = 1 02. Var A:array[1 366] of Integer; Đoạn chương trình trên thức hiện công việc: A.Khai báo gián tiếp mảng một chiều gồm 366 phần tử nguyên dương. B.Khai báo trực tiếp mảng một chiều gồm 366 phần tử nguyên dương. C.Khai báo trực tiếp mảng một chiều gồm 366 phần tử nguyên. D.Khai báo gián tiếp mảng một chiều gồm 366 phần tử nguyên 03. Trong ngôn ngữ lập trình Pascal với khai báo như sau: Type mang=array[1 100] of integer; Var a,b:mang; c:array[1 100] of integer; Câu lệnh nào dưới đây hợp lệ: A.b:=c; B.c:=b; C.a:=c; D.a:=b; 04. Cho S1 = 'Ha Noi' và S2 = 'Ha Nam' A.S1<= S2 B.S1 = S2 C.S1 >= S2 D.S1 > S2 05. A.Xuất giá trị các phần tử mảng A hai chiều B.Nhập vào giá trị các phần tử mảng A một chiều C.Xuất giá trị các phần tử mảng A một chiều D.Nhập vào giá trị các phần tử mảng A hai chiều 06. A.Bằng phương pháp tìm tuần tự nổi bọt B.Bằng phương pháp tìm nhị phân C.Bằng phương pháp tìm tuần tự D.Bằng phương pháp tìm ngẩu nhiên từ giữa dãy. 07. Phát biểu nào sau đây là đúng nhất? A. Tên tệp là một hằng xâu; B. Tên tệp là biến xâu và hằng xâu; C. Tên tệp là một biến xâu; D. Tên tệp là một biến xâu hoặc hằng xâu; 08. MÃ ĐỀ: A1B1C1D1 A.Tính tổng các phần tử của mảng một chiều. B.Tính tổng các chỉ số của mảng một chiều C.Tính tổng các số từ 1 đến n D. 09. A.Tính tổng các số từ 1 đến n B.Tính tổng của S và i C.Tính tổng các phần tử của mảng một chiều. D.Tính tổng S và A[i] 10. A.Bằng phương pháp tìm tuần tự B.Bằng phương pháp tìm nhị phân C.Bằng phương pháp tìm tuần tự nổi bọt D.Bằng phương pháp tìm ngẩu nhiên từ giữa dãy 11. S = 'Song Hong' Delete(S,1,5); A.S= 'Song' B.S= 'HONG' C.S= 'Hong' D.S= 'Song Hong' 12. Cú pháp câu lệnh dùng thủ tục mở tệp để ghi có dạng: A. rewrite(<tên tệp>); B. rewrite(<biến tệp>); C. reset(<biến tệp>); D. reset(<tên tệp>); 13. Khai báo nào của mảng một chiều sau đây là đúng A.Type A:array[1 366] of Integer; var A: integer; B.Type A:array[1 366] of Integer; C.Var A:array[1 366] of Integer; D.Var A:array[1…366] of Integer; 14. A.Tìm chỉ số lớn nhất của dãy B.Tìm chỉ số nhỏ nhất của dãy C.Tìm số lớn nhất của dãy D.Tìm số nhỏ nhất của dãy 15. TYPE Bang = array[1 9,1 9] of integer; Var A: Bang; A.Khai báo gián tiếp mảng 2 chiều gồm 81 phần tử nguyên B.Khai báo trực tiếp mảng 2 chiều gồm 9 phần tử nguyên dương. C.Khai báo gián tiếp mảng một chiều gồm 9 phần tử nguyên dương. D.Khai báo trực tiếp mảng một chiều gồm 9 phần tử nguyên. 16. Phát biểu nào sau đây là sai? A. Lượng thông tin lưu trữ trên tệp chỉ phụ thuộc vào dung lượng bộ nhớ ngoài; B. Dữ liệu kiểu tệp được lưu trữ lâu dài ở bộ nhớ trong C. Dữ liệu kiểu tệp được lưu trữ lâu dài ở bộ nhớ ngoài D. Xét theo cách tổ chức dữ liệu thì có 2 loại tệp; 17. Khái báo mảng một chiều nào sau đây là đúng: A.Var dayso=array[1 250] of Integer; B.Type dayso=array[1 250] of Integer; Var dayso:A; C.Type dayso=array[1 250] of Integer; Var A:dayso; D.Type dayso: array[1 250] of Integer; Var A:dayso; 18. Cú pháp khai báo tệp văn bản nào sau đây là đúng? A. Var <tên biến tệp>:text; B. Var [<tên biến tệp>]:text; C. Type <tên biến tệp>:text; D. Var <[tên biến tệp]>:text; 19. Phát biểu nào sau đây không đúng? A. Việc trao đổi dữ liệu với bộ nhớ ngoài được thực hiện thông qua kiểu dữ liệu tệp B. Để có thể làm việc với tệp ta không cần khai báo biến tệp C. Các thao tác với tệp văn bản: khai báo biến tệp, mở tệp, đóng tệp,… D. Mỗi ngôn ngữ lập trình đều có chương trình chuẩn để làm việc với tệp 20. Với đoạn chương trình trên, để tham chiếu đến trường SBD của bản ghi thực hiện như sau: A. LOP.SBD[i]; B. LOP[i].SBD; C. SBD[i]. LOP; D. SBD. LOP[i]; 21. Trong ngôn ngữ lập trình Pascal A.Các phần tử của mảng một chiều được sắp thứ tự giá trị tăng dần; B.Các phần tử của mảng một chiều không sắp thứ tự; C.Các phần tử của mảng một chiều được sắp thứ tự giá trị giảm dần; D.Các phần tử của mảng một chiều được sắp thứ tự theo chỉ số; 22. Đoạn chương trình trên thức hiện công việc: A.Xuất các chỉ số i của mảng một chiều A ra màn hình B.Xuất n phân tử của mảng một chiều A ra màn hình C. D. 23. S = 'Xin chao cac ban' A.Length(S) = 12; B.Length(S) = 8; C.Length(S) = 16; D.Length(S) = 13; 24. Type dayso=array[1 250] of Integer; Var A:dayso; Đoạn chương trình trên thức hiện công việc: A.Khai báo mảng 1 chiều B.Khái báo kiểu dữ liệu mới C.Khái báo mảng một chiều bằng cách trực tiếp D.Khai báo mảng một chiều bằng cách gián tiếp 25. Tham chiếu trường bản ghi ta thực hiện: A. Tên trường.tên biến bản ghi; B. Tên biến bản ghi.tên trường; C. Tên trường.tên biến mảng; D. Tên biến mảng.tên trường; 26. A.Nhập vào giá trị các phần tử mảng A hai chiều B.Xuất 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 một chiều D.Nhập vào giá trị các phần tử mảng A một chiều 27. S = 'Truong*THPT*Truong*Vinh*Ky'; Copy(S,7,6); A.S= '*THPT* ' B.S= ' *THPT*' C.S= '*THPT*' D.S= 'THPT* ' 28. ] Cho bảng sau: 1 Mở tệp để ghi 2 Đóng tệp 3 Gán tên tệp 4 Mở tệp để đọc 5 Đọc dữ liệu từ tệp 6 Ghi dữ liệu từ tệp Chọn câu đúng với thứ tự A. 1-2-3-6; 1-4-5-6; B. 6-2-1-4; 3-5-6-2; C. 3-4-5-2; 3-1-6-2 D. 3-2-1-4; 3-4-6-2; 29. 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ự 30. 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]); 31. S1='Truong' S2='Hinh .2' Insert(s1,s2,6) A.S2= 'Hinh Truong.2' B.S2= 'Hinh 2Truong.' C.S2= 'Hinh .Truong2' D.S2= 'Hinh Truong2' 32. Khai báo biến tệp nào sau đây là đúng? A. Var taptin:test; B. Var taptin,taptin1: text; C. Type taptin,taptin1: text; D. Type taptin: text; 33. Phát biểu nào sau đây không đúng? A. Xâu là một dãy các ký tự trong bộ mã ASCII B. Mảng hai chiều là một dãy hữu hạn các phần tử cùng kiểu C. Mảng hai chiều là một bảng các phần tử cùng kiểu D. Mảng một chiều là một dãy hữu hạn các phần tử cùng kiểu 34. Chọn cú pháp gán tên tệp đúng: A. assign(<tên tệp>,<biến tệp>) B. assing(<biến tệp>,<tên tệp>); C. assign(<biến tệp>,<tên tệp>); D. assing(<tên tệp>,<biến tệp>); 35. Cú pháp khai báo kiểu bản ghi nào sau đây là đúng? A. B. C. D. 36. For i:=1 to n do begin Write('Nhap gia tri cua phan tu thu ',i,' = '); Readln(A[i]); end; Đoạn chương trình trên làm công việc: A.Nhập giá trị của n phần tử cho mảng một chiều A B.Nhập giá trị cho n chỉ số i của mảng một chiều A C.Tính tổng từ 1 đến n của mảng một chiều A D.Nhập giá trị cho phần tử thứ A[i] của mảng một chiều A 37. Có mấy cách để gán giá trị cho biến bản ghi? A. Có 5 cách; B. Có 3 cách; C. Có 2 cách; D. Có 4 cách; 38. Xâu là: A.Dãy 128 ký tự trong bộ mã ASCII B.Dãy các ký tự trong bộ mã ASCII C.Dãy 24 ký tự trong bộ mã ASCII D.Là mảng 1 chiều A có 24 Ký tự 39. A.Sắp xếp mảng một chiều A thành giải giảm B.Đổi chỗ A[i] với A[i+1] 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 40. Đoạn chương trình trên thực hiện công việc: A. Khai báo biến kiểu bản ghi; B. Khai báo dữ liệu kiểu chuổi; C. Khai báo kiểu dữ liệu cho các trường; D. Khai báo dữ liệu kiểu bảng ghi; 41. 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 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 C.So sánh độ dài của xâu b và xâu 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 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 42. Cho bảng sau: 1 Mở tệp để ghi 2 Đóng tệp 3 Gán tên tệp 4 Mở tệp để đọc 5 Đọc dữ liệu từ tệp 6 Ghi dữ liệu từ tệp Chọn câu đúng với thứ tự A. 1-2-3-4-5-6; B. 6-2-1-4 C. 3-4-5-2; D. 3-2-1-4 43. S1= 'Truong*Vinh*'; S2= '*Ky*'; S=S1 + S2; A.S= '*Truong*Vinh**Ky*' B.S= '*Truong Vinh Ky*' C.S= 'Truong*Vinh**Ky*' D.S= 'Truong*Vinh*Ky' 44. Cho xâu S= 'String[20]' A.Độ dài xâu S là 20 B.Độ dài xâu S là 255 C.Độ dài xâu S là 11 D.Độ dài xâu S là 10 45. Cú pháp câu lệnh dùng thủ tục để đọc có dạng: A. readln(<danh sách biến>;<biến tệp>); B. readln(<danh sách biến>,<biến tệp>); C. read(<biến tệp>;<danh sách biến>); D. read(<biến tệp>,<danh sách biến>); 46. Var Bang: array[1 9,1 9] of integer; A.Khai báo trực tiếp mảng một chiều gồm 9 phần tử nguyên. B.Khai báo trực tiếp mảng 2 chiều gồm 9 phần tử nguyên dương. C.Khai báo gián tiếp mảng một chiều gồm 9 phần tử nguyên dương. D.Khai báo trực tiếp mảng 2 chiều gồm 81 phần tử nguyên 47. Cú pháp câu lệnh dùng thủ tục mở tệp để đọc có dạng: A. rewrite(<biến tệp>); B. reset(<biến tệp>); C. rewrite(<tên tệp>); D. reset(<tên tệp>); 48. Cho S1 = ' Xau' và S2= 'Xau ki tu' A.S1 < S2 B.S1<=S2 C.S1 > S2 D.S1 = S2 49. Xét theo cách tổ chức dữ liệu có mấy loại tệp? A. Có 2 loại; B. Có 3 loại; C. Có 5 loại; D. Có 1 loại; 50. Đoạn chương trình trên thực hiện công việc: A. Không thực hiện được vì lỗi cú pháp; B. Xuất dữ liệu các thuộc tính của n bản ghi; C. Xuất và Nhập dữ liệu các thuộc tính của n bản ghi; D. Nhập dữ liệu các thuộc tính của n bản ghi; . ĐỀ KIỂM TRA 1 TIẾT 01. S1=&apos ;1& apos; S2='Hinh 1. 2' A.Pos(S1,S2) = 5 B.Pos(S1,S2) = 6 C.Pos(S1,S2) = 7 D.Pos(S1,S2) = 1 02. Var A:array [1. .366]. mang=array [1. .10 0] of integer; Var a,b:mang; c:array [1. .10 0] of integer; Câu lệnh nào dưới đây hợp lệ: A.b:=c; B.c:=b; C.a:=c; D.a:=b; 04. Cho S1 = 'Ha