SỞ GIÁO DỤC VÀ ĐÀO TẠO TRƯỜNG THPT MA TRẬN ĐỀ KIỂM TRA CUỐI KÌ 2 NĂM HỌC 2021 2022 Môn TIN HỌC – LỚP 11 Chủ đề Nhận biết Thông hiểu Vận dụng Tổng Tự luận Trắc nghiệm Tự luận Trắc nghiệm Tự luận Trắc n.Câu 7: Phát biểu nào dưới đây là đúng? A. Các kiểu dữ liệu đều được lưu trữ ở bộ nhớ trong (RAM). B. Dữ liệu kiểu tệp được lưu trữ ở bộ nhớ trong. C. Các dữ liệu trong máy tính đều bị mất đi khi tắt nguồn điện. D. Dữ liệu kiểu tệp được lưu trữ ở bộ nhờ ngoài (đĩa mềm, đĩa cứng, CD. thiết bị nhớ Flash). Câu 8: Trong một chương trình Pascal, sau khi đã đóng tệp bằng thủ tục đóng tệp thì có thể mở lại tệp đó hay không? A. Cần phải gắn lại tên tệp cho biến tệp trước khi mở B. Được phép mở lại vô số lần tùy ý C. Không được phép mở lại D. Được phép mở lại 1 lần duy nhất Câu 9: Trong NNLT Pascal, cú pháp để mở tệp ở chế độ đọc dữ liệu từ tệp là:
SỞ GIÁO DỤC VÀ ĐÀO TẠO TRƯỜNG THPT MA TRẬN ĐỀ KIỂM TRA CUỐI KÌ NĂM HỌC 2021 - 2022 Môn: TIN HỌC – LỚP 11 Thông hiểu Nhận biết Vận dụng Chủ đề Tổng Tự luận Trắc nghiệm 2 Tự luận Trắc nghiệm Tự luận Trắc nghiệm Kiểu mảng Kiểu liệu tệp Chương trình phân loại mamon TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN made 111 111 111 111 111 111 111 111 111 111 111 111 111 111 111 5, điểm cautron 10 11 12 13 14 15 12 Tổng số điểm dapan B D D B A B B D C A D A D B C 2, điểm ĐÁP ÁN CÁC MÃ ĐỀ TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN 111 111 111 111 111 112 112 112 112 112 112 112 112 112 112 112 điểm 16 17 18 19 20 10 11 A C C A C A D C C D B A C B C D 10 điểm TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN 112 112 112 112 112 112 112 112 112 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 114 114 114 114 114 114 12 13 14 15 16 17 18 19 20 10 11 12 13 14 15 16 17 18 19 20 D A B A C D B A B C A B D B A C D C D A A B D C D B A C B B D A C D A TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN 114 114 114 114 114 114 114 114 114 114 114 114 114 114 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 115 10 11 12 13 14 15 16 17 18 19 20 10 11 12 13 14 15 16 17 18 19 20 D B D C A D A B B A C C C B B B D D D B C A A B D A D B C A C C A C SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG TRƯỜNG THPT VIỆT YÊN SỐ ĐỀ THI CUỐI HỌC KỲ Môn: TIN HỌC 11 Thời gian làm bài: 45 phút; Mã đề thi: 111 (Thí sinh khơng sử dụng tài liệu) Họ, tên thí sinh: Lớp: I TRẮC NGHIỆM (5 điểm) Câu 1: Chương trình chia thành loại? A B C Câu 2: Để khai báo hàm Pascal khóa A Var B Procedure C Program D D Function Câu 3: Cho khai báo sau: Var s:string; Độ dài tối đa xâu s bao nhiêu? A B C 256 D 255 Câu 4: Hàm abs(-15) cho giá trị? A -15 B 15 C 16 D -16 Câu 5: Kiểu liệu hàm A Có thể kiểu integer, real, char, boolean, string B Chỉ kiểu C Chỉ kiểu integer D Có thể integer, real, char, boolean, string, record, kiểu mảng Câu 6: Cho biết f1 biến tệp văn tệp ketqua.txt có nội dung lưu trữ là: Tich so la: 20 Hãy cho biết sau thực đoạn lệnh sau: a := 10; b :=2; assign(f1, 'ketqua.txt'); rewrite(f1); writeln(f1, 'Thuong so la: ', a/b); tệp ketqua.txt có nội dung gì? A Tich so la: 20 C Tich so la: 20Thuong so la: B Thuong so la: D Thuong so la: 5Tich so la: 20 Câu 7: Hàm sau dùng để? Function Max(a,b:integer): integer; Begin If a>b then return a Else return b; End; A Tìm giá trị lớn hai số thực C Tìm giá trị nhỏ hai số thực Câu 8: Phát biểu sau đúng? B Tìm giá trị lớn hai số nguyên D Tìm giá trị nhỏ hai số nguyên A Số lượng phần tử tệp cố định B Tệp lưu trữ lâu dài đĩa, khơng thể xóa tệp đĩa C Dữ liệu tệp lưu trữ đĩa thành vùng liệu liên tục D Kích thước tệp lớn Câu 9: Trong NNLT Pascal, sau làm việc với tệp cần phải đóng tệp Cú pháp để đóng tệp là: A close; B close( < tên tệp > ); C close( < biến tệp > ); D close all; Câu 10: Hàm sqrt(81) trả lại giá trị là? A B 6561 C D -81 Câu 11: Trong NNLT Pascal, cú pháp để khai báo biến tệp văn là: A var < tên tệp > : txt; B var < tên biến tệp > : txt; C var < tên tệp > : text; D var < tên biến tệp > : text; Câu 12: Phát biểu đúng? A Dữ liệu kiểu tệp lưu trữ nhờ (đĩa mềm, đĩa cứng, CD thiết bị nhớ Flash) B Các kiểu liệu lưu trữ nhớ (RAM) C Các liệu máy tính bị tắt nguồn điện D Dữ liệu kiểu tệp lưu trữ nhớ Câu 13: Trong NNLT Pascal, cú pháp để mở tệp chế độ đọc liệu từ tệp là: A reset ( < biến tệp >); B restart ( < biến tệp >); C repeat( < biến tệp >); D rewrite ( < biến tệp >); Câu 14: Trong Pascal, thực chương trình VD_bt1_txt ghi kết kết cho vào tệp văn BT1.TXT ? ProgramVD_bt1_txt; Uses crt ; Var f : text ; Begin Clrscr; Assign(f, ‘BT1.TXT ’) ; Rewrite(f) ; Write(f, 123 + 456) ; Close(f) ; End A 123 + 456 B 579 C 123 456 D 123456 Câu 15: Trong chương trình Pascal, sau đóng tệp thủ tục đóng tệp mở lại tệp hay không? A Được phép mở lại lần B Không phép mở lại C Được phép mở lại vô số lần tùy ý D Cần phải gắn lại tên tệp cho biến tệp trước mở Câu 16: Hàm hàm sau trả độ dài xâu? A Length(s) B Copy(s, vt, n) C Delete(s,vt, n) D Pos(s1, s2) Câu 17: Trong NNLT Pascal, cú pháp để gắn tên tệp cho biến tệp là: A assign ( < tên tệp > , < biến tệp > ); B < tên tệp > := < biến tệp >; C assign ( < biến tệp > , < tên tệp > ); D < biến tệp > := < tên tệp >; Câu 18: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta viết? A Var f1 f2 : Text; B Var f1 : f2 : Text; C Var f1 , f2 : Text; D Var f1 ; f2 : Text; Câu 19: Hãy chọn phương án ghép Tệp truy cập trực tiếp A Cho phép tham chiếu đến liệu cần truy cập cách xác định trực tiếp vị trí liệu B cho phép truy cập đến liệu tệp cách đầu tệp qua tất liệu trước C tệp mà phần tử tổ chức theo cấu trúc định D tệp mà liệu ghi dạng ký tự theo mã ASCII Câu 20: Để khai báo thủ tục Pascal khóa A Var B Program C Procedure D Function II TỰ LUẬN (5 đ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 - HẾT -SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG TRƯỜNG THPT VIỆT YÊN SỐ ĐỀ THI CUỐI HỌC KỲ Môn: TIN HỌC 11 Thời gian làm bài: 45 phút; Mã đề thi: 112 (Thí sinh khơng sử dụng tài liệu) Họ, tên thí sinh: Lớp: I TRẮC NGHIỆM (5 điểm) Câu 1: Kiểu liệu hàm A Có thể kiểu integer, real, char, boolean, string B Chỉ kiểu integer C Chỉ kiểu D Có thể integer, real, char, boolean, string, record, kiểu mảng Câu 2: Trong NNLT Pascal, sau làm việc với tệp cần phải đóng tệp Cú pháp để đóng tệp là: A close all; B close( < tên tệp > ); C close; D close( < biến tệp > ); Câu 3: Để khai báo thủ tục Pascal khóa A Var B Program C Procedure D Function Câu 4: Trong NNLT Pascal, cú pháp để khai báo biến tệp văn là: A var < tên biến tệp > : txt; B var < tên tệp > : txt; C var < tên biến tệp > : text; D var < tên tệp > : text; Câu 5: Phát biểu đúng? A Các liệu máy tính bị tắt nguồn điện B Dữ liệu kiểu tệp lưu trữ nhớ C Các kiểu liệu lưu trữ nhớ (RAM) D Dữ liệu kiểu tệp lưu trữ nhờ (đĩa mềm, đĩa cứng, CD thiết bị nhớ Flash) Câu 6: Hãy chọn phương án ghép Tệp truy cập trực tiếp A cho phép truy cập đến liệu tệp cách đầu tệp qua tất liệu trước B Cho phép tham chiếu đến liệu cần truy cập cách xác định trực tiếp vị trí liệu C tệp mà phần tử tổ chức theo cấu trúc định D tệp mà liệu ghi dạng ký tự theo mã ASCII Câu 7: Phát biểu sau đúng? A Kích thước tệp lớn B Tệp lưu trữ lâu dài đĩa, khơng thể xóa tệp đĩa C Dữ liệu tệp lưu trữ đĩa thành vùng liệu liên tục D Số lượng phần tử tệp cố định Câu 8: Trong chương trình Pascal, sau đóng tệp thủ tục đóng tệp mở lại tệp hay khơng? A Không phép mở lại B Được phép mở lại lần C Được phép mở lại vô số lần tùy ý D Cần phải gắn lại tên tệp cho biến tệp trước mở Câu 9: Để khai báo hàm Pascal khóa A Program B Function C Var D Procedure Câu 10: Chương trình chia thành loại? A B C D Câu 11: Trong Pascal, thực chương trình VD_bt1_txt ghi kết kết cho vào tệp văn BT1.TXT ? ProgramVD_bt1_txt; Uses crt ; Var f : text ; Begin Clrscr; Assign(f, ‘BT1.TXT ’) ; Rewrite(f) ; Write(f, 123 + 456) ; Close(f) ; End A 123 456 B 123456 C 123 + 456 D 579 Câu 12: Trong NNLT Pascal, cú pháp để mở tệp chế độ đọc liệu từ tệp là: A reset ( < biến tệp >); B restart ( < biến tệp >); C repeat( < biến tệp >); D rewrite ( < biến tệp >); Câu 13: Hàm abs(-15) cho giá trị? A 15 B -16 C 16 D -15 Câu 14: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta viết? A Var f1 f2 : Text; B Var f1 , f2 : Text; C Var f1 : f2 : Text; D Var f1 ; f2 : Text; Câu 15: Hàm hàm sau trả độ dài xâu? A Length(s) B Copy(s, vt, n) C Delete(s,vt, n) D Pos(s1, s2) Câu 16: Trong NNLT Pascal, cú pháp để gắn tên tệp cho biến tệp là: A assign ( < tên tệp > , < biến tệp > ); B < tên tệp > := < biến tệp >; C assign ( < biến tệp > , < tên tệp > ); D < biến tệp > := < tên tệp >; Câu 17: Cho biết f1 biến tệp văn tệp ketqua.txt có nội dung lưu trữ là: Tich so la: 20 Hãy cho biết sau thực đoạn lệnh sau: a := 10; b :=2; assign(f1, 'ketqua.txt'); rewrite(f1); writeln(f1, 'Thuong so la: ', a/b); tệp ketqua.txt có nội dung gì? A Tich so la: 20 C Thuong so la: 5Tich so la: 20 B Tich so la: 20Thuong so la: D Thuong so la: Câu 18: Cho khai báo sau: Var s:string; Độ dài tối đa xâu s bao nhiêu? A B 255 Câu 19: Hàm sqrt(81) trả lại giá trị là? A B 6561 C 256 D C D -81 Câu 20: Hàm sau dùng để? Function Max(a,b:integer): integer; Begin If a>b then return a Else return b; End; A Tìm giá trị lớn hai số thực C Tìm giá trị nhỏ hai số thực B Tìm giá trị lớn hai số nguyên D Tìm giá trị nhỏ hai số nguyên II TỰ LUẬN (5 đ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: c) Viết thủ tục nhập giá trị cho mảng A từ bàn phím d) Viết thủ tục in hình phần tử âm mảng A - HẾT -SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG TRƯỜNG THPT VIỆT YÊN SỐ Mã đề thi: 113 ĐỀ THI CUỐI HỌC KỲ Môn: TIN HỌC 11 Thời gian làm bài: 45 phút; (Thí sinh khơng sử dụng tài liệu) Họ, tên thí sinh: Lớp: I TRẮC NGHIỆM (5 điểm) Câu 1: Hàm sau dùng để? Function Max(a,b:integer): integer; Begin If a>b then return a Else return b; End; A Tìm giá trị lớn hai số thực B Tìm giá trị nhỏ hai số nguyên C Tìm giá trị lớn hai số nguyên D Tìm giá trị nhỏ hai số thực Câu 2: Để khai báo hàm Pascal khóa A Function B Program C Procedure D Var Câu 3: Hãy chọn phương án ghép Tệp truy cập trực tiếp A tệp mà liệu ghi dạng ký tự theo mã ASCII B Cho phép tham chiếu đến liệu cần truy cập cách xác định trực tiếp vị trí liệu C cho phép truy cập đến liệu tệp cách đầu tệp qua tất liệu trước D tệp mà phần tử tổ chức theo cấu trúc định 10 Câu 4: Để khai báo thủ tục Pascal khóa A Function B Program C Var D Procedure Câu 5: Trong Pascal, thực chương trình VD_bt1_txt ghi kết kết cho vào tệp văn BT1.TXT ? ProgramVD_bt1_txt; Uses crt ; Var f : text ; Begin Clrscr; Assign(f, ‘BT1.TXT ’) ; Rewrite(f) ; Write(f, 123 + 456) ; Close(f) ; End A 123456 B 579 C 123 + 456 D 123 456 Câu 6: Phát biểu sau đúng? A Kích thước tệp lớn B Tệp lưu trữ lâu dài đĩa, khơng thể xóa tệp đĩa C Dữ liệu tệp lưu trữ đĩa thành vùng liệu liên tục D Số lượng phần tử tệp cố định Câu 7: Trong chương trình Pascal, sau đóng tệp thủ tục đóng tệp mở lại tệp hay khơng? A Khơng phép mở lại B Được phép mở lại lần C Được phép mở lại vô số lần tùy ý D Cần phải gắn lại tên tệp cho biến tệp trước mở Câu 8: Phát biểu đúng? A Các kiểu liệu lưu trữ nhớ (RAM) B Dữ liệu kiểu tệp lưu trữ nhớ C Các liệu máy tính bị tắt nguồn điện D Dữ liệu kiểu tệp lưu trữ nhờ (đĩa mềm, đĩa cứng, CD thiết bị nhớ Flash) Câu 9: Hàm abs(-15) cho giá trị? A 16 B -16 C 15 D -15 Câu 10: Trong NNLT Pascal, cú pháp để mở tệp chế độ đọc liệu từ tệp là: 11 A reset ( < biến tệp >); B restart ( < biến tệp >); C repeat( < biến tệp >); D rewrite ( < biến tệp >); Câu 11: Hàm hàm sau trả độ dài xâu? A Length(s) B Copy(s, vt, n) C Delete(s,vt, n) D Pos(s1, s2) Câu 12: Trong NNLT Pascal, sau làm việc với tệp cần phải đóng tệp Cú pháp để đóng tệp là: A close( < biến tệp > ); B close all; C close; D close( < tên tệp > ); Câu 13: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta viết? A Var f1 f2 : Text; B Var f1 , f2 : Text; C Var f1 : f2 : Text; D Var f1 ; f2 : Text; Câu 14: Trong NNLT Pascal, cú pháp để khai báo biến tệp văn là: A var < tên biến tệp > : txt; B var < tên tệp > : text; C var < tên tệp > : txt; D var < tên biến tệp > : text; Câu 15: Trong NNLT Pascal, cú pháp để gắn tên tệp cho biến tệp là: A assign ( < tên tệp > , < biến tệp > ); B < tên tệp > := < biến tệp >; C assign ( < biến tệp > , < tên tệp > ); D < biến tệp > := < tên tệp >; Câu 16: Cho biết f1 biến tệp văn tệp ketqua.txt có nội dung lưu trữ là: Tich so la: 20 Hãy cho biết sau thực đoạn lệnh sau: a := 10; b :=2; assign(f1, 'ketqua.txt'); rewrite(f1); writeln(f1, 'Thuong so la: ', a/b); tệp ketqua.txt có nội dung gì? A Tich so la: 20 C Thuong so la: 5Tich so la: 20 Câu 17: Cho khai báo sau: B Tich so la: 20Thuong so la: D Thuong so la: Var s:string; Độ dài tối đa xâu s bao nhiêu? A B 255 C 256 Câu 18: Hàm sqrt(81) trả lại giá trị là? A B 6561 C Câu 19: Kiểu liệu hàm A Chỉ kiểu integer B Chỉ kiểu C Có thể kiểu integer, real, char, boolean, string 12 D D -81 D Có thể integer, real, char, boolean, string, record, kiểu mảng Câu 20: Chương trình chia thành loại? A B C D II TỰ LUẬN (5 đ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: e) Viết thủ tục nhập giá trị cho mảng A từ bàn phím f) Viết thủ tục in hình phần tử âm mảng A - HẾT -SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG ĐỀ THI CUỐI HỌC KỲ TRƯỜNG THPT VIỆT YÊN SỐ Môn: TIN HỌC 11 Thời gian làm bài: 45 phút; Mã đề thi: 114 (Thí sinh khơng sử dụng tài liệu) Họ, tên thí sinh: Mã số: 13 I TRẮC NGHIỆM (5 điểm) Câu 1: Cho khai báo sau: Var s:string; Độ dài tối đa xâu s bao nhiêu? A B 255 C 256 D Câu 2: Trong NNLT Pascal, cú pháp để khai báo biến tệp văn là: A var < tên biến tệp > : txt; B var < tên tệp > : text; C var < tên tệp > : txt; D var < tên biến tệp > : text; Câu 3: Hàm hàm sau trả độ dài xâu? A Length(s) B Copy(s, vt, n) C Delete(s,vt, n) D Pos(s1, s2) Câu 4: Cho biết f1 biến tệp văn tệp ketqua.txt có nội dung lưu trữ là: Tich so la: 20 Hãy cho biết sau thực đoạn lệnh sau: a := 10; b :=2; assign(f1, 'ketqua.txt'); rewrite(f1); writeln(f1, 'Thuong so la: ', a/b); tệp ketqua.txt có nội dung gì? A Tich so la: 20 B Tich so la: 20Thuong so la: C Thuong so la: D Thuong so la: 5Tich so la: 20 Câu 5: Trong NNLT Pascal, cú pháp để gắn tên tệp cho biến tệp là: A assign ( < tên tệp > , < biến tệp > ); B < biến tệp > := < tên tệp >; C < tên tệp > := < biến tệp >; D assign ( < biến tệp > , < tên tệp > ); Câu 6: Hàm sqrt(81) trả lại giá trị là? A B 6561 C D -81 Câu 7: Phát biểu đúng? A Các kiểu liệu lưu trữ nhớ (RAM) B Dữ liệu kiểu tệp lưu trữ nhớ C Các liệu máy tính bị tắt nguồn điện D Dữ liệu kiểu tệp lưu trữ nhờ (đĩa mềm, đĩa cứng, CD thiết bị nhớ Flash) Câu 8: Trong chương trình Pascal, sau đóng tệp thủ tục đóng tệp mở lại tệp hay khơng? A Cần phải gắn lại tên tệp cho biến tệp trước mở B Được phép mở lại vô số lần tùy ý C Không phép mở lại D Được phép mở lại lần 14 Câu 9: Trong NNLT Pascal, cú pháp để mở tệp chế độ đọc liệu từ tệp là: A reset ( < biến tệp >); B restart ( < biến tệp >); C repeat( < biến tệp >); D rewrite ( < biến tệp >); Câu 10: Trong NNLT Pascal, sau làm việc với tệp cần phải đóng tệp Cú pháp để đóng tệp là: A close; B close all; C close( < biến tệp > ); D close( < tên tệp > ); Câu 11: Để khai báo thủ tục Pascal khóa A Procedure B Function C Var D Program Câu 12: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta viết? A Var f1 f2 : Text; B Var f1 ; f2 : Text; C Var f1 : f2 : Text; D Var f1 , f2 : Text; Câu 13: Trong Pascal, thực chương trình VD_bt1_txt ghi kết kết cho vào tệp văn BT1.TXT ? ProgramVD_bt1_txt; Uses crt ; Var f : text ; Begin Clrscr; Assign(f, ‘BT1.TXT ’) ; Rewrite(f) ; Write(f, 123 + 456) ; Close(f) ; End A 579 B 123 456 C 123456 D 123 + 456 Câu 14: Hãy chọn phương án ghép Tệp truy cập trực tiếp A tệp mà liệu ghi dạng ký tự theo mã ASCII B Cho phép tham chiếu đến liệu cần truy cập cách xác định trực tiếp vị trí liệu C cho phép truy cập đến liệu tệp cách đầu tệp qua tất liệu trước D tệp mà phần tử tổ chức theo cấu trúc định Câu 15: Hàm abs(-15) cho giá trị? 15 A 16 B 15 C -15 D -16 Câu 16: Để khai báo hàm Pascal khóa A Function B Procedure C Program D Var Câu 17: Phát biểu sau đúng? A Tệp lưu trữ lâu dài đĩa, khơng thể xóa tệp đĩa B Số lượng phần tử tệp cố định C Kích thước tệp lớn D Dữ liệu tệp lưu trữ đĩa thành vùng liệu liên tục Câu 18: Kiểu liệu hàm A Chỉ kiểu integer B Chỉ kiểu C Có thể kiểu integer, real, char, boolean, string D Có thể integer, real, char, boolean, string, record, kiểu mảng Câu 19: Chương trình chia thành loại? A B C D Câu 20: Hàm sau dùng để? Function Max(a,b:integer): integer; Begin If a>b then return a Else return b; End; A Tìm giá trị lớn hai số thực C Tìm giá trị nhỏ hai số nguyên B Tìm giá trị lớn hai số nguyên D Tìm giá trị nhỏ hai số thực II TỰ LUẬN (5 đ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; 16 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: g) Viết thủ tục nhập giá trị cho mảng A từ bàn phím h) Viết thủ tục in hình phần tử âm mảng A - HẾT -SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG TRƯỜNG THPT VIỆT YÊN SỐ SỞ GIÁO DỤC & ĐÀO TẠO BẮC GIANG TRƯỜNG THPT VIỆT YÊN SỐ Mã đề thi: 115 Mã đề thi: 116 PHẦN I : TRẮC NGHIỆM (5 điểm) 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’) D foe(f) 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; 17 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 Câu 8: Tệp f có liệu 15 B 1; 3; 5; C 1; 3; 5;7; D 4; 6; 8;10 để đọ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’); 15 ta sử dụng Câu 9: Giả sử a = 5; b = 9; c = 15; để ghi giá trị vào tệp f có 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 10: 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 Câu 11: Trong NNLT Pascal, cú pháp để khai báo biến tệp văn là: A var < tên tệp > : txt; B var < tên biến tệp > : txt; C var < tên tệp > : text; D var < tên biến tệp > : text; Câu 12: Phát biểu đúng? 18 A Dữ liệu kiểu tệp lưu trữ nhờ (đĩa mềm, đĩa cứng, CD thiết bị nhớ Flash) B Các kiểu liệu lưu trữ nhớ (RAM) C Các liệu máy tính bị tắt nguồn điện D Dữ liệu kiểu tệp lưu trữ nhớ Câu 13: Trong NNLT Pascal, cú pháp để mở tệp chế độ đọc liệu từ tệp là: A reset ( < biến tệp >); B restart ( < biến tệp >); C repeat( < biến tệp >); D rewrite ( < biến tệp >); Câu 14: Trong Pascal, thực chương trình VD_bt1_txt ghi kết kết cho vào tệp văn BT1.TXT ? ProgramVD_bt1_txt; Uses crt ; Var f : text ; Begin Clrscr; Assign(f, ‘BT1.TXT ’) ; Rewrite(f) ; Write(f, 123 + 456) ; Close(f) ; End A 123 + 456 B 579 C 123 456 D 123456 Câu 15: Trong chương trình Pascal, sau đóng tệp thủ tục đóng tệp mở lại tệp hay khơng? A Được phép mở lại lần B Không phép mở lại C Được phép mở lại vô số lần tùy ý D Cần phải gắn lại tên tệp cho biến tệp trước mở Câu 16: Hàm hàm sau trả độ dài xâu? A Length(s) B Copy(s, vt, n) C Delete(s,vt, n) D Pos(s1, s2) Câu 17: Trong NNLT Pascal, cú pháp để gắn tên tệp cho biến tệp là: A assign ( < tên tệp > , < biến tệp > ); B < tên tệp > := < biến tệp >; C assign ( < biến tệp > , < tên tệp > ); D < biến tệp > := < tên tệp >; Câu 18: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta viết? 19 A Var f1 f2 : Text; B Var f1 : f2 : Text; C Var f1 , f2 : Text; D Var f1 ; f2 : Text; Câu 19: Hãy chọn phương án ghép Tệp truy cập trực tiếp A Cho phép tham chiếu đến liệu cần truy cập cách xác định trực tiếp vị trí liệu B cho phép truy cập đến liệu tệp cách đầu tệp qua tất liệu trước C tệp mà phần tử tổ chức theo cấu trúc định D tệp mà liệu ghi dạng ký tự theo mã ASCII Câu 20: Để khai báo thủ tục Pascal khóa A Var B Program C Procedure D Function PHẦN II: TỰ LUẬN (5 đ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 - HẾT 20 .. .TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN 1 12 1 12 1 12 1 12 1 12 1 12 1 12 1 12 1 12 113 113 113 113 ... A TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN TIN 114 114 114 114 114 114 114 114 114 114 114 114 114 114 ... 1 12 1 12 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 113 114 114 114 114 114 114 12 13 14 15 16 17 18 19 20 10 11 12 13 14 15 16 17 18 19 20 D A B A C D B A B C