PHẦN I TRẮC NGHIỆM ( 4 ĐIỂM) Trường THPT Lương Sơn Tổ Toán Lý Tin KTCN ĐỀ KIỂM TRA HỌC KỲ 2 Môn Tin học 11 Họ và tên học sinh Lớp ĐỀ SỐ 4 PHẦN I TRẮC NGHIỆM (6 điểm) Chọn đáp án đúng và điền vào bảng[.]
Trường THPT Lương Sơn Tổ Toán - Lý - Tin - KTCN ĐỀ KIỂM TRA HỌC KỲ Môn Tin học 11 Điểm Họ tên học sinh: Lớp : ĐỀ SỐ PHẦN I : TRẮC NGHIỆM (6 điểm) Chọn đáp án điền vào bảng tương ứng Câu Đáp án 10 11 Câu 1: Khẳng định sau đúng? A Chỉ có thủ tục có tham số hình thức B Cả thủ tục hàm có tham số hình thức C Chỉ có hàm có tham số hình thức D Thủ tục hàm phải có tham số hình thức Câu 2: Để biết trỏ tệp cuối dòng tệp f hay chưa, ta sử dụng hàm: A eof(f) B eoln(f) C eof(f, ‘trai.txt’) 12 13 14 15 D foe(f) 16 Câu 3: Khẳng định sau đúng? A Cả lời gọi hàm lời gọi thủ tục phải có tham số thực B Lời gọi thủ tục thiết phải có tham số thực cịn lời gọi hàm khơng thiết phải có tham số thực C Lời gọi hàm định phải có tham số thực cịn lời gọi thủ tục khơng thiết phải có tham số thực D Lời gọi hàm lời gọi thủ tục có tham số thực khơng có tham số thực tuỳ thuộc vào hàm thủ tục Câu 4: Trong NNLT Pascal, khai báo sau khai báo tệp văn bản? A Var f: String; B Var f: byte; C Var f = record D Var f: Text; Câu 5: Giả sử thư mục gốc đĩa C có tệp f có nội dung sẵn Khi thực thủ tục Rewrite(f); A Nội dung tệp f hình B Nội dung tệp cũ nguyên C Nội dung ghi phía tệp có sẵn D Nội dung tệp cũ bị xoá để chuẩn bị ghi liệu Câu 6: Câu lệnh dùng thủ tục đọc có dạng: A Read(); B Read(,); C Read(, ); D Read(); Câu 7: Cho đoạn chương trình sau: Var g:text; I:integer; Begin Assign(g, ‘C:\DLA.txt’); Rewrite(g); For i:=1 to 10 If i mod then write(g, i); Close(g); Readln End Sau thực chương trình trên, nội dung tệp ‘DLA.txt’ gồm phần tử nào? A 2; 4; 6; 8;10 B 1; 3; 5; C 1; 3; 5;7; D 4; 6; 8;10 Câu 8: Tệp f có liệu 15 để đọc giá trị từ tệp f ghi giá trị vào biến x, y, z ta sử dụng câu lệnh: A Read(f, x, y, z); B Read(f, ‘x’, ‘y’, ‘z’); C Read(x, y, z); D Read(‘x’, ‘y’, ‘z’); Câu 9: Câu lệnh dùng thủ tục ghi có dạng: A Writeln(); B Writeln(,(); C Writeln(, ); D Writeln(); Câu 10: Phát biểu sau xác nói hàm EOF(): A Hàm cho giá trị True trỏ tệp vị trí kết thúc dịng B Hàm cho giá trị False trỏ tệp vị trí kết thúc tệp C Hàm cho giá trị False trỏ tệp vị trí kết thúc dịng D Hàm cho giá trị True trỏ tệp vị trí kết thúc tệp 15 Câu 11: Giả sử a = 5; b = 9; c = 15; để ghi giá trị vào tệp f có dạng ta sử dụng thủ tục ghi: A Write(f, a,b,c); B Write(a, ‘ ’, b, ‘ ’, c); C Write(f, a, ‘ ’, bc); D Write(f, a ‘’, b‘’, c); Câu 12: Trong Pascal để khai báo ba biến tệp văn f1, f2, f3 cần sử dụng cách viết sau đây? A Var f1 f2 f3:text; B Var f1,f2,f3:text; C Var f1; f2;f3:text; D Var f1:f2:f3:text; Câu 13: Nói cấu trúc chương trình con, khẳng định sau không đúng? A Phần đầu phần thân thiết phai có, phần khai báo có khơng B Phần khai báo có khơng có tuỳ thuộc vào chương trình cụ thể C Phần đầu thiết phải có để khai báo tên chương trình D Phân đầu có khơng có Câu 14: Tham số khai báo thủ tục hàm gọi gì? A Tham số hình thức B Tham số thực C Biến cục D Biến toàn Câu 15: Khẳng định sau đúng? A Biến cục biến dùng chương trình B Biến cục biến dùng chương trình chứa C Biến cục biến dùng chương trình chứa chương trình D Biến tồn cục sử dụng chương trình khơng sử dụng chương trình PHẦN II: TỰ LUẬN (4 điểm): Câu 1: Cho chương trình sau Program Baitap; Var x, y, z , t: word; Function BCNN(a, b:word):word; Var du, c, d:word; Begin c:=a; d:=b; While b0 Begin du:=a mod b; a:=b; b:=du; End; BCNN:=(c*d) div a; End; Begin Write(‘nhap so x, y, z, t: ‘); readln(x, y, z, t); Write(‘BCNN cua so la: ’, BCNN(BCNN(x, y),BCNN(z, t))); Readln; End Câu hỏi: Quan sát và: a) Nêu tham số thực sự, tham số hình thức? b) Nêu tên biến cục bộ, biến toàn cục? Câu 2: Cho mảng A gồm N phần tử thuộc kiểu nguyên (N≤50)? Viết chương trình thực yêu cầu sau: a) Viết thủ tục nhập giá trị cho mảng A từ bàn phím b) Viết thủ tục in hình phần tử âm mảng A ĐÁP ÁN VÀ THANG ĐIỂM ĐỀ KIỂM TRA HỌC KỲ II ĐỀ 4: PHẦN I : TRẮC NGHIỆM (6 điểm) Câu Đáp án Điểm B 0.4 B 0.4 D 0.4 D 0.4 D 0.4 B 0.4 C 0.4 PHẦN II: TỰ LUẬN (4 điểm): Câu 1: (1 điểm) a) Tham số thực sự: x, y, z, t Tham số hình thức: a, b b) Biến cục bộ: du, c, d Biến toàn cục: x, y, z, t Câu 2: (3 điểm) a) Viết thủ tục nhập giá trị cho mảng A từ bàn phím procedure nhap(var B:kmang; var n:integer); begin write(‘Nhap so phan tu cua mang N=’); readln(n); for i:=1 to n begin write(‘Nhap phan tu thu A[‘,i,’]=’); readln(B[i]); end; end; A 0.4 C 0.4 10 D 0.4 11 A 0.4 12 B 0.4 13 D 0.4 14 A 0.4 15 B 0.4 b) Viết thủ tục in hình phần tử âm mảng A procedure hienam(B:kmang;n:byte); begin for i := to n if B[i] < then write(B[i],’ ’); end;