Đề thi học kì 2 môn Tin học 11 - Đề 22 - 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 - Đề 22 - 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- ĐỀ 022 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: 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 := length(S) downto 1 do write(S[i]); C. For i := 1 to length(S) do write(S[i]); D. k:= length(S); Câu 2: 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ị nhỏ nhất. C. Tìm giá trị TG D. Hàm hoán đổi giá trị x và y Câu 3: Cho biết kết quả hàm Pos(‘h’, ‘MuaThu’); A. 1 B. 3 C. 5 D. 2 Câu 4: Từ khóa để viết thủ tục là A. Procedure B. Program C. Begin D. End. Câu 5: Dữ liệu thuộc kiểu dữ liệu liệu tệp được lưu ở bộ nhớ nào ? A. Bộ nhớ ngoài B. Bộ nhớ trong C. Rom D. Ram Câu 6: Trong PASCAL mở tệp h để đọc dữ liệu ta phải sử dụng thủ tục A. Rewrite(f); B. Rewrite(h); C. Reset(h); D. Reset(f); Câu 7: Chương trình nào cho giá trị trả về qua tên? A. Var B. Procedure C. Program D. Function Câu 8: 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 : Text; C. Var : Text; D. Var : String; Câu 9: Trong PASCAL, writeln(f, d, m); A. ghi giá trị d,m vào tệp văn bản 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ị m vào tệp Câu 10: Kết thúc chương trình con bằng từ khóa nào? A. Var B. Clrscr; C. End. D. End; Câu 11: Xâu kí tự có độ dài bằng 0 gọi là: A. Xâu ngắn B. Không tồn tại C. Chứa kí tự 0 D. Xâu rỗng Câu 12: Để gắn tệp KQ.TXT cho biến tệp f1 ta sử dụng câu lệnh A. KQ.TXT := f1; B. Assign(‘KQ.TXT’,f1); C. f1 := ‘KQ.TXT’; D. Assign(f1,‘KQ.TXT’); Câu 13: Độ dài tối đa của xâu kí tự s[10] trong Pascal là: A. 256 B. Không giới hạn C. 255 D. 10 Câu 14: 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 Trang 1/3
2. 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? BAN TEN GI? B. BAN TEN GI? C. 1 BAN TEN GI? D. 1 Câu 15: Trong khi chưa kết thúc tệp... A. While not EOF(f) do B. while EOF(f) do C. EOLN( ); D. And 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=2, n=2, 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