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

Chia sẻ: Lotus_0 Lotus_0 | Ngày: | Loại File: PDF | Số trang:7

Thêm vào BST

Báo xấu

101
lượt xem 9
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Tham khảo tài liệu 'câu hỏi trắc nghiệm (p8)', công nghệ thông tin, tin học văn phòng phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: CÂU HỎI TRẮC NGHIỆM (P8)

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