Đề kiểm tra học kỳ II - Năm học: 2008 - 2009 môn: Tin Học

<span class='text_page_counter'>(1)</span>Së GD&§T Thanh ho¸ Trường THPT Vĩnh Lộc. đề kiểm tra học kỳ II N¨m häc: 2008 - 2009 M«n: Tin häc.. §Ò sè 1 1. Mục tiêu đánh giá: - Đánh giá kết quả tiếp thu của học sinh sau khi học hết các chương V, VI 2. Mục đích, yêu cầu của đề: - N¾m ®­îc mét sè thao t¸c c¬ b¶n víi tÖp v¨n b¶n - Nắm được tác dụng của chương trình con - Viết được một chương trình con đơn giản - Biết sử dụng một số thủ tục có trong các thư viện chương trình con chuẩn 3. Ma trận đề: BiÕt C©u 1, 2, 3, 4 HiÓu C©u 3 VËn dông C©u 4, 5 4. Nội dung đề: Câu 1: Trong NNLT Pascal, dữ liệu kiểu tệp: A. Sẽ bị mất hết khi tắt máy C. Được lưu trữ lâu dài trên bộ nhớ ngoài B. Không bao giờ bị mất D. Sẽ bị mất hết khi chương trình thực hiện xong Câu 2: Trong NNLT Pascal, để gán tên tệp cho biến tệp ta sử dụng câu lệnh: A. <biến tệp>:= <tên tệp>; C. <tên tệp>:= <biến tệp>; B. Assign (<biến tệp>, <tên tệp>); D. Assign (<tên tệp>, <biến tệp>); Câu 3: Trong NNLT Pascal, mở tệp để đọc dữ liệu ta sử dụng thủ tục: A. Reset(<tên tệp>); C. Reset(<biến tệp>); B. Rewrite(<tên tệp>); D. Rewrite(<biến tệp>); Câu 4: Trong NNLT Pascal, để đọc dữ liệu từ tệp văn bản ta có thể sử dụng thủ tục: A. Read(<tên tệp>, <danh sách biến>); C. Read(<biến tệp>, <danh sách biến>); B. Real(<tên tệp>, <danh sách biến>); D. Real(<biến tệp>, <danh sách biến>); Câu 5: Cho chương trình sau: Var a,b,c: integer; Procedure Hoan_doi(Var a,b:integer); Var tg: integer; Begin tg:=a; a:=b; b:=tg; End; Begin a:=10; b:=11; c:=12; Hoan_doi(b,c); Hoan_doi(a,b); Hoan_doi(b,c); Writeln(a,' ',b,' ',c); Readln End;. Hãy cho biết kết quả trên màn hình khi chạy chương trình? Câu 6: Viết chương trình thực hiện vẽ cung elip màu đỏ có tâm (100, 200), góc khởi đầu 30, góc kết thúc là 120, bán kính trục Xr = 30, Yr=40. Câu 7: Viết hàm Tongchan(n:integer):integer; để tính tổng các số chẵn nhỏ hơn hoặc bằng n. Lop11.com.

<span class='text_page_counter'>(2)</span> 5. Đáp án và thang điểm Câu 1: C (0.5 điểm) Câu 3: C (0.5 điểm) Câu 2: B (0.5 điểm) Câu 4: C (0.5 điểm) Câu 5: (2 điểm) Kết quả trên màn hình khi chạy chương trình là: 12 11 10 Câu 6: Uses Graph; Var gd, gm: integer; Begin gd:=detect; InitGraph(gd,gm,'C:\TPB\BIN'); Setcolor(Red); Ellipse(100,200,30,120,30,40); Readln; CloseGraph; Readln End.. Câu: 7:. Lop11.com.

<span class='text_page_counter'>(3)</span>