[1][TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền. Chương 4: Kiểu dữ liệu có cấu trúc – Chương 5: Dữ liệu kiểu tệp. ID 1. 2. 3. 4. Questions. Image. Các khẳng định nào không đúng đối với mảng 1 chiều? []. Mảng có số phần tử đếm được. []. Các phần tử trong mảng có thể khác kiểu. []. Các phần tử trong mảng phân biệt bằng chỉ số. []. Mảng chỉ có 1 tên là tên mảng. Yếu tố nào sau đây không thật sự cần thiết khi xây dựng mảng 1 chiều []. Tên mảng, hoặc tên kiểu mảng. []. Số lượng phần tử tối đa. []. Số byte bị chiếm dụng trong bộ nhớ khi khai báo mảng. []. Kiểu dữ liệu của phần tử. Khai báo kiểu mảng một chiều nào sau đây không hợp lệ? []. Type m=Array[-100..100] or real;. []. Type m=Array[1.5..10.5] of real;. []. Type m=Array[0..100] of Integer;. []. Type m=Array['a'..'z'] of boolean;. Chương trình có sử dụng biến mảng thường chứa câu lệnh lặp loại nào ? [gõ chữ thường] _________________________________. 5. type ArrayInt=Array[1..20] of integer; ArrayInt là _____. 6. []. Kiểu mảng. []. Mảng. []. Số nguyên. []. Số nguyên >=1 và 'may vi tinh'. 33. []. True. []. False. Cho biết kết quả phép so sánh sau: 'ABBA' = 'abba'. 34. []. True. []. False. Cho biết kết quả phép so sánh sau: 'a' > 'ABC'. 35. []. True. []. False. Hãy cho biết giá trị của biến L = ? s:='Ngo'; s:=s+'Quyen'; L:=length[s]; _________________________________. 36. Hãy cho biết giá trị của biến L = ? s:='Ngo'; s:=s+' Quyen'; L:=length[s]; _________________________________. 37. Hãy cho biết giá trị của biến L = ? s:='Ngo '; s:=s+' Quyen';. 8|Page. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [9] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền L:=length[s]; _________________________________ 38. Giá trị của xâu s = ? s:='Ngo Quyen'; delete[s,4,5]; writeln[s]; _________________________________. 39. Cho biết giá trị của xâu s = ? s:='Xuan Canh Dan'; delete[s,1,5]; writeln[s]; _________________________________. 40. Cho biết giá trị của L = ? s:='Xuan Canh Dan'; delete[s,1,5]; L:=length[s]; _________________________________. 41. Đoạn chương trình sau đây làm gì ? ... s:=''; s1:='Van Su Nhu Y'; insert[s1,s,1]; .... 42. []. Chèn xâu s1 vào xâu s. []. Chèn xâu s1 vào xâu s tại vị trí thứ 1. []. Chèn xâu s vào s1 tại vị trí thứ 1. []. Tìm xâu s có trong s1 hay không. Đoạn chương trình sau đây làm gì ? var k: byte; s, s1: string; ... write['k='];readln[k]; write['s1='];readln[s1]; insert[s1,s,k]; .... 9|Page. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [10] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền. 43. []. Chèn s1 vào s tại vị trí k. []. Chèn k vào s1. []. Chèn s vào s tại vị trí k. []. Chèn k vào s1 tại vị trí thứ 1. Hãy cho biết giá trị của biến x = ? x:=copy['An Khang Thinh Vuong',1,8]; _________________________________. 44. Hãy cho biết giá trị của biến y = ? x:='An Khang Thinh Vuong' y:=copy[x,10,5]; _________________________________. 45. Hãy tìm các lệnh sai trong các lệnh sau đây: []. var k: byte; ... k:=length["2010"];. []. var s,s1: string[20]; ... s1:='Tron Doi Ben Em'; s:=copy[s1,1,length[s1]];. []. var s: string; ... delete[s,257,10];. []. s1:='Ly Hai'; s2:='Minh Ha'; .. s1:=s1 + ' ' + s2;. []. s1:='Ly Hai'; s2:='Minh Ha'; s1:=s1 & s2;. 46. Hãy cho biết giá trị của biến p=? var p: byte; ... s1:='Xuan Canh Dan'; s2:='Canh Dan'; p:=pos[s2,s1];. 10 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [11] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền _________________________________ 47. Hãy cho biết kết quả của biến y=? var x, y: string; L, i: byte; begin x:='Viet Nam'; L:=length[x]; y:=''; for i:=L downto 1 do y:=y+x[i]; writeln[y]; end. _________________________________. 48. Chương trình sau đây làm gì ? Hãy chọn câu trả lời chính xác nhất. type xau30=string[30]; var x: xau; p: byte; begin write['x ='];readln[x]; p:=pos[' ',x]; if p>0 then delete[x,p,1]; writeln[x]; end.. 49. []. Xoá khoảng trống đầu tiên trong xâu x. []. Tìm khoảng trống đầu tiên trong xâu x. []. Tìm khoảng trống đầu tiên trong xâu x, nếu có thì xoá đi. []. Tính chiều dài của xâu x. Chương trình sau đây làm gì ? program RSP; var s1, s2: string; L, i: byte; begin write['s1='];readln[s1]; L:=length[s1]; s2:='';. 11 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [12] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền for i:=1 to L do if s1[i]' ' then s2:=s2 + s1[i]; writeln[s2]; end.. 50. []. Loại bỏ các khoảng trống trong xâu. []. Sao chép từng ký tự trong xâu s1 qua xâu s2 nhưng bỏ qua các khoảng trống. []. Tạo ra xâu s2 là xâu đảo ngược của s1. []. Tạo ra 2 xâu s1 và s2 giống hệt nhau. Sắp xếp lại để hoàn chỉnh chương trình kiểm tra xâu có đối xứng hay không ? a. for i:=L downto 1 do s2:=s2 + s1[i];. b. write['s1='];readln[s1];. c. begin. d. s2:=''; L:=length[s1];. e. var s1, s2: string; L, i: byte;. 51. f. if s1=s2 then writeln['Xâu đối xứng'] else writeln['Xâu không đối xứng'];. g. end.. Lệnh nào sau đây dùng để sao chép nội dung từ xâu B qua xâu A []. A:=copy[B,1,length[B]];. []. B:=A;. []. L:=length[B]; A:=''; for i:=1 to L do A:=A + B[i];. []. L:=length[B]; for i:=1 to L do A[i]:=B[i];. 52. Đoạn chương trình sau đây đúng hay sai: var X: Array[1..255] of char; Y: string; i: byte; Begin. 12 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [13] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền Y:='Computer'; for i:=1 to lenght[Y]; X:= X + Y[i]; writeln[X]; end.. 53. []. True. []. False. Hãy chọn khai báo đúng []. type HOCSINH=record hoten: string[30]; dtb: real; end;. []. var HOCSINH=record hoten:string[30]; dtb: real; end;. []. type HOCSINH:record hoten: string[30]; dtb: real; end;. []. type PHANSO=record tu_so, mau_so: real; end;. 54. 55. Chọn khẳng định đúng []. Sau khi dùng từ khoá Type để định nghĩa kiểu dữ liệu RECORD ta sẽ có kiểu dữ liệu mới. []. Sau khi dùng từ khoá Type để định nghĩa kiểu dữ liệu RECORD ta có ngay biến mới có kiểu dữ liệu như khai báo. []. Kiểu dữ liệu kiểu RECORD có thể được tạo ra từ những kiểu dữ liệu cơ sở. []. Kiểu dữ liệu kiểu RECORD có thể được tạo ra từ những kiểu RECORD đã khai báo trước đó. Chọn các khai báo đúng []. type DIEM=record x, y: real; end;. 13 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [14] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền type TAMGIAC=record A, B, C: DIEM; end; []. type PHANSO=record tu_so, mau_so: real; end; var PS1, PS2: PHAN_SO;. []. type TAMTHUC=record A, B, C: real; end; Var T: TAMTHUC;. 56. Cho khai báo như sau: type PHANSO=record tu_so, mau_so: real; end; var P: PHANSO; Muốn tham chiếu đến tu_so của phân số P ta dùng lệnh: _________________________________. 57. Cho khai báo sau đây: type DIEM=record x, y: real; end; Var A, B: DIEM; Tham chiếu nào sau đây đúng ?. 58. []. A.x. []. A[x]. []. B[y]. []. A_x. Cho khai báo như sau: type DIEM=record x, y: real; end; type TAMGIAC=record A, B, C: DIEM; end; Var T1, T2: TAMGIAC;. 14 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [15] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền M: DIEM; Chọn lệnh [nhóm lệnh] sai:. 59. []. T1.X:=2.5;. []. T1.A.X:=2.5;. []. T1.X:=M;. []. T1:=T2;. []. T2:=M;. []. T2.A:=M;. Cho khai báo sau đây: type PHANSO=record tu_so, mau_so: real; end; var P, P1, P2: PHANSO; Chọn lệnh [nhóm lệnh sai] []. if P1=P2 then writeln['P1 bằng P2'] else writeln['P1 khác P2'];. []. if [P1.tu_so=P2.tu_so] and [P1.mau_so=P2.mau_so] then writeln['P1 bằng P2'] else writeln['P1 khác P2'];. []. if P1.mau_so=P2.mau_so then begin P.mau_so:=P1.mau_so; P.tu_so:=P1.tu_so+P2.tu_so; writeln[P.tu_so,'/',P.mau_so]; end else writeln['Phân số không cùng mẫu'];. 60. Cho khai báo record sau đây: type NhanVien=record ma_nhan_vien: string[5]; ho_ten: string[30]; CMND:string[10]; he_so_luong: real;. 15 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [16] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền luong_co_ban: real; end; Hãy chọn khai báo [lệnh] đúng []. Var Danh_Sach_Nhan_Vien: Array[1..50] of NHANVIEN;. []. Type DSNV=Array[1..100] of NHANVIEN; var Nhan_Vien_CTY: DSNV;. []. Var NV: NHANVIEN; ... NV.ma_nhan_vien:='PKD006';. []. Var Danh_sach: Array[1..20] of NHANVIEN; ... Danh_sach.ho_ten:='Dam Vinh Hung';. 61. Hãy xem định nghĩa sau đây đúng hay sai type PHANSO=record; tu_so, mau_so: integer; end;. 62. 63. 64. []. Đúng. []. Sai. Trình tự làm việc với dữ liệu kiểu tập tin [tệp] trong Pascal là: a. Đóng tập tin lại. b. Gán đường dẫn và tên tập tin vào biến tập tin. c. Khai báo biến tập tin. d. Đọc hoặc ghi dữ liệu vào tập tin. e. Mở tập tin. Muốn mở tập tin ra để ghi dữ liệu vào ta dùng thủ tục: []. rewrite[f]. []. write[f]. []. writeln[f]. []. reset[f]. Muốn mở tập tin để đọc dữ liệu, ta dùng thủ tục nào sau đây []. Reset[f]. []. ReWrite[f]. []. Readln[f]. []. Read[f]. 16 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [17] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền 65. 66. 67. Khi con trỏ đang ở cuối tập tin f, hàm eof[f] trả về giá trị nào ? []. True. []. False. Sau đây là một số thủ tục làm việc với dữ liệu kiểu tệp trong Pascal. Em hãy cho biết ý nghĩa của chúng Choice. Match. Reset[f]. Đóng tập tin. Close[f]. Ghi giá trị của biến vào tập tin. Assign[f,'ketqua.txt']. Khai báo biến F kiểu tệp. Read[f,c] hoặc Readln[f,s1]. Mở biến tập tin f để đọc. Write[f,s1] hoặc Writeln[f,s2]. Gán biến f trỏ vào tập tin ketqua.txt trên đĩa hiện hành. ReWrite[f]. Đọc dữ liệu từ tập tin vào biến. Var F: Text;. Mở biến tập tin f để ghi. Cho đoạn chương trình sau đây, hãy xem đúng cú pháp hay không ? var F: text; begin ... f:='c:\dulieu.txt'; ... end.. 68. []. True. []. False. Cho đoạn chương trình sau đây, hãy xem đúng cú pháp hay không ? var F: text; begin ... assign[f,'c:\dulieu.txt']; ... end.. 69. []. True. []. False. Muốn ghi một dòng văn bản có nội dung là: Pascal vào tập tin f. 17 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [18] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền em có thể dùng lệnh [nhóm lệnh] nào ? []. writeln[f,'Pascal'];. []. s:='Pascal'; write[f,s];. []. Writeln['Pascal',f];. []. s:='Pascal'; Writeln[s];. 70. Nhóm lệnh sau đây làm gì ? var f: text; .. readln[f,s];. 71. 72. 73. 74. []. Đọc dữ liệu trong tập tin f. []. Đọc 1 dòng dữ liệu trong tập tin f và đưa nội dung vào biến s. []. Đọc dữ liệu cho biến f và s từ bàn phím. []. Đọc dữ liệu từ bàn phím sau đó ghi vào tập tin f. Khi lập trình trong Pascal, muốn lưu trữ dữ liệu lâu dài, ta nên chọn loại thiết bị lưu trữ nào ? []. Bộ nhớ ngoài. []. Bộ nhớ trong. []. Không câu nào đúng. Xét theo cách tổ chức dữ liệu, tập tin có thể phân thành mấy loại ? []. Tập tin văn bản, tập tin có cấu trúc. []. Tập tin truy cập tuần tự, tập tin truy cập trực tiếp. []. Tập tin nhị phân, tập tin văn bản. []. Tất cả đều đúng. Xét theo cách thức truy cập, tập tin có thể phân thành mấy loại ? []. Tập tin văn bản, tập tin có cấu trúc. []. Tập tin truy cập tuần tự, tập tin truy cập trực tiếp. []. Tập tin nhị phân, tập tin văn bản. []. Tất cả đều đúng. Thao tác cơ bản nhất trên tập tin là:. 18 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [19] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền. 75. 76. 77. 78. []. Đọc, ghi dữ liệu. []. Tính kích thước tập tin. []. Xoá tập tin. []. Đổi tên tập tin. Đặc điểm nào sau đây không đúng với dữ liệu kiểu tập tin []. Lưu trữ được một lượng lớn thông tin. []. Lưu trữ dài lâu và không bị mất khi tắt máy tính. []. Được lưu trữ trong bộ nhớ ngoài. []. Được lưu trữ trong bộ nhớ trong. Trong các khai báo tập tin sau đây, khai báo nào sai: []. Type F: File of char;. []. Var F: Text;. []. Var F: File of Integer;. []. Type F=file;. Để mở một tập tin mới và ghi nội dung vào ta chọn lệnh: []. Reset[f];. []. Rewrite[f];. []. Writer[f];. []. New[f];. Để tạo một tập tin lưu trữ thông tin của học sinh theo khai báo sau đây, em hãy chọn khai báo tập tin đúng: type HOCSINH=record hoten:string[30]; gioitinh: string[3]; end;. 79. []. Var F: Text;. []. Var F: File of HOCSINH;. []. Var HOCSINH: Text;. []. Var hoten, gioitinh: File;. Hàm EOLN[f] trả về false khi con trỏ nằm ở vị trí nào trong tập tin ? []. Khi ở cuối dòng. []. Khi ở cuối tập tin. 19 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [20] [TIN HỌC 11 – CHƯƠNG 4 & 5] Trường THPT Ngô Quyền. 80. []. Khi chưa đến cuối dòng. []. Không câu nào đúng. Cho biến tập tin là f, đường dẫn tập tin là c:\vanban.txt Em viết thủ tục [bằng chữ thường] gán đường tập tin vào biến f _________________________________. 81. Hãy chọn lệnh sai trong các lệnh ghi dữ liệu vào tập tin sau đây []. writeln[f,'Fast Track'];. []. s:='Fast Track'; writeln[f,s];. []. type hocsinh=record ... end; var hs: hocsinh; ... writeln[f,hs];. []. type diem=record ... end; var A, B: diem; ... write[f,A,B];. 82. 83. 84. Hãy chọn khẳng định sai []. ReWrite[f]: Mở tập tin để ghi. []. Assign[f,'c:\vanban.txt'];. []. Close[f]: Đóng tập tin. []. Reset[f]: Xoá tập tin. Để định nghĩa một kiểu RECORD mới, ta cần phải có những yếu tố nào ? []. Tên kiểu. []. Tên [các] thuộc tính. []. Kiểu dữ liệu của [từng] thuộc tính. []. Tên biến kiểu record. Hãy xem đoạn chương trình sau đây làm gì ? type PHANSO=record ts, ms: integer;. 20 | P a g e. Gv: Nguyễn Hồ Thiên Đăng. Lop11.com. [21]