CÂU HỎI TRẮC NGHIỆM (P8) pptx

CÂU HỎI TRẮC NGHIỆM Câu 1: Khai báo nào đúng : a) Type T = Set of Real; b) Type T = Set of Integer; c) Type T = Set of String ; d) Type T = Set of 0 9 ; Câu 2: Khai báo nào sai : a) Var T : Set of Char ; b) Var T : Set of -10 300 ; c) Var T : Set of ‘A’ ’z’ ; d) Var T : Set of Boolean ; Câu 3: Tổng của [1 5] + [3 10, 20] là tập hợp nào: a) [1 10, 20] b) [1 5] c) [1 20] d) [3 5] Câu 4: Hiệu của hai tập hợp [10 15]-[4 12] là tập hợp nào: a) [4 15] b) [13 15] c) [4 10] d) [10 12] Câu 5: Cho khai báo: Var T : Set of Char ; ch : Char ; Sau khi thực hiện các lệnh: T:=[‘A’ ‘D’] * [‘A’ ‘Z’]; For ch:=’A’ to ‘F’ do T:=T+[ch] ; Tập T sẽ là: a) [‘A’ ’D’] b) [‘A’ ’Z’] c) [‘A’ ’F’] d) [‘C’ ’F’] Câu 6: Cho khai báo : Var F: File of Integer ; i , j , k :Integer ; Chọn câu có các lệnh đều đúng : a) Assign( F, T1.DAT ); Rewrite(F); Write(F, i, j, k ); b) Assign(F, ‘T1.DAT’ ); Rewrite(F); Write(F, i+ j+ k ); c) Assign(F); Rewrite( F, ‘T1.DAT’ ); Write(F, i, j, k ); d) Assign(F, ‘T1.DAT’ ); Rewrite(F); Write(F, i, j, k ); Câu 7: Khi chạy chương trình : Var F : File of Char; ch : Char; Begin Assign(F, ‘tt.txt’); Rewrite(F); For ch:=’A’ to ‘F’ do Write(F, ch); Seek(F, 4); Read(F, ch); Write(ch); Close(F); End. Kết quả in ra là: a) E b) F c) C d) D Câu 8: Cho khai báo: Var F : TEXT ; Sau khi thực hiện các lệnh: Assign(F, ‘tt1.txt’); Rewrite(F); Write(F, 123+456); Close(F); Nội dung của tập tin tt1.txt sẽ là: a) 123+456 b) 123456 c) 579 d) 123 456 Câu 9: Cho F1 là biến tập tin có định kiểu và F2 là biến tập tin văn bản. Lệnh nào không dùng được : a) Seek( F1, 0); b) Seek(F2, 0); c) Write( Filesize(F1) ) ; d) Write( FilePos(F1) ) ; Câu 10: Cho TT2.TXT là tập tin văn bản có nội dung là : Turbo Pascal 6.0 Khi chạy chương trình : Var F : Text; St : String[20]; Begin Assign(F, ‘tt2.txt’); Reset(F); Read(F, St); Write(St); Close(F); End. sẽ in ra chữ : a) Turbo Pascal 6.0 b) Turbo c) Pascal 6.0 d) Turbo Pascal . CÂU HỎI TRẮC NGHIỆM Câu 1: Khai báo nào đúng : a) Type T = Set of Real; b) Type T = Set of Integer; c) Type T = Set of String ; d) Type T = Set of 0 9 ; Câu 2: Khai báo. Set of ‘A’ ’z’ ; d) Var T : Set of Boolean ; Câu 3: Tổng của [1 5] + [3 10, 20] là tập hợp nào: a) [1 10, 20] b) [1 5] c) [1 20] d) [3 5] Câu 4: Hiệu của hai tập hợp [10 15]-[4 12] là tập. a) [‘A’ ’D’] b) [‘A’ ’Z’] c) [‘A’ ’F’] d) [‘C’ ’F’] Câu 6: Cho khai báo : Var F: File of Integer ; i , j , k :Integer ; Chọn câu có các lệnh đều đúng : a) Assign( F, T1.DAT ); Rewrite(F);