Đề thi học kì 2 môn Tin học 11 - Đề 33 - Năm học 2018-2019 - Trường THPT Mạc Đĩnh Chi (Có đáp án)

Nội dung text: Đề thi học kì 2 môn Tin học 11 - Đề 33 - Năm học 2018-2019 - Trường THPT Mạc Đĩnh Chi (Có đáp án)

1. TRƯỜNG THPT MẠC ĐĨNH CHI ĐỀ THI HỌC KÌ II, NĂM HỌC 2018-2019 TỔ: TIN MÔN: TIN 11-ĐỀ 033 Thời gian làm bài: 45 phút; HỌ VÀ TÊN: .. Lớp: .. I.Trắc nghiệm (6 điểm) Câu 1: Xâu kí tự có độ dài bằng 0 gọi là: A. Chứa kí tự 0 B. Xâu ngắn C. Không tồn tại D. Xâu rỗng Câu 2: Kết thúc chương trình con bằng từ khóa nào? A. End. B. Clrscr; C. End; D. Var Câu 3: Trong PASCAL mở tệp h để đọc dữ liệu ta phải sử dụng thủ tục A. Reset(f); B. Rewrite(h); C. Reset(h); D. Rewrite(f); Câu 4: Cho trước tệp văn bản BT2.TXT chỉ có một dòng, chứa dòng chữ : 1 BAN TEN GI? ngay ở đầu dòng. Chương trình Program VD; Var f : text ; A:byte; S:string Begin Assign(f, ‘BT2.TXT ’) ; Reset(f) ; Read(f, a, s) ; Write(s) ; Close(f) ; End . Trên màn hình sẽ hiện kết quả nào trong các kết quả cho dưới đây A. BAN TEN GI? B. 1 BAN TEN GI? C. 1 D. BAN TEN GI? BAN TEN GI? Câu 5: Trong khi chưa kết thúc tệp... A. And B. EOLN( ); C. while EOF(f) do D. While not EOF(f) do Câu 6: Để gắn tệp KQ.TXT cho biến tệp f1 ta sử dụng câu lệnh A. Assign(f1,‘KQ.TXT’); B. KQ.TXT := f1; C. f1 := ‘KQ.TXT’; D. Assign(‘KQ.TXT’,f1); Câu 7: Chương trình nào cho giá trị trả về qua tên? A. Var B. Function C. Program D. Procedure Câu 8: Trong ngôn ngữ lập trình Pascal, gán k bằng độ dài xâu A. For i := length(S) downto 1 do write(S); B. For i := 1 to length(S) do write(S[i]); C. k:= length(S); D. For i := length(S) downto 1 do write(S[i]); Câu 9: Từ khóa để viết thủ tục là A. End. B. Procedure C. Begin D. Program Câu 10: Trong PASCAL, writeln(f, d, m); A. ghi giá trị m vào tệp B. ghi giá trị f,d,m vào tệp văn bản C. ghi giá trị f, d vào tệp văn bản D. ghi giá trị d,m vào tệp văn bản Câu 11: Trong PASCAL để khai báo biến tệp văn bản ta phải sử dụng cú pháp A. Var : String; B. Var : String; C. Var : Text; D. Var : Text; Câu 12: Cho biết kết quả hàm Pos(‘h’, ‘MuaThu’); Trang 1/3
2. A. 5 B. 1 C. 3 D. 2 Câu 13: Cho đoạn chương trình Procedure H_D( Var x, y:integer); Var TG: integer; Begin TG:=x; y:=x; y:=TG; end; A. Thủ tục hoán đổi giá trị x, y B. Tìm giá trị TG C. Tìm giá trị nhỏ nhất. D. Hàm hoán đổi giá trị x và y Câu 14: Độ dài tối đa của xâu kí tự s[10] trong Pascal là: A. 256 B. 10 C. Không giới hạn D. 255 Câu 15: Dữ liệu thuộc kiểu dữ liệu liệu tệp được lưu ở bộ nhớ nào ? A. Rom B. Bộ nhớ trong C. Bộ nhớ ngoài D. Ram II. Tự luận(4 điểm) Câu1: Cho đoạn chương trình còn thiếu Var f: ; m,n: ; . Begin writeln(‘ nhập m,n’); Readln(n,m); Assign(f, ‘KQ.TXT’); Rewrite( .); {Đoạn tính tổng, tích và biến lưu là tong và tich} . . . Write(f ,Tong, ‘ ‘, tich ); {ghi tổng tích vào tệp} Close( ); END. a. Hoàn thành chương trình tính tổng và tích 2 giá trị m,n và ghi tổng, tích đó vào tệp (1điểm) b. Cho biết tên biến tệp Tên tệp: .(0.5điểm) c. Nếu m=3, n=3, sau khi thực hiện chương trình kết quả ghi ra tệp KETQUA.TXT giá trị là ............. và ........... (0.5điểm) Câu 2: Viết chương trình vẽ 4 hình tam giác như mẫu. Chương trình có sử dụng chương trình con để vẽ hình tam giác. Mỗi hình cách nhau 1 dòng kẻ ‘= = = = = = = = = = =’ * * * * * * * * * * * * * = = = = = = = = = = = = = = = = = = = = = = = BÀI LÀM Trang 2/3
3. Trang 3/3