ĐỀ KIỂM TRA 15’ Trường THPT Cao Bình KIỂM TRA 1 TIẾT Họ và tên Môn Tin học Lớp 11 I TRẮC NGHIỆM (5 điểm) (Khoanh tròn những câu trả lời đúng nhất) 1 Công thức nào sau đây là đúng? (st1, st2 các biến k[.]
Trường THPT Cao Bình Họ tên: Lớp: 11…… KIỂM TRA TIẾT Môn: Tin học Đề I TRẮC NGHIỆM:(5 điểm) (Khoanh tròn câu trả lời nhất) 1.Công thức sau đúng? (st1, st2 biến kiểu xâu m, n biến kiểu số nguyên) a Delete(st1,st2,m); b Delete(st1,m,n); c Delete(m,st1,n) d Delete(m,n,st1) Cho st1=’Van’ st2= ‘Hoang Van Huy’, sau thực lệnh Pos(st1,st2) kết bao nhiêu? a b c.9 d.10 Cho chuỗi st:=’ BBBABBA’; Kết in sau thực lệnh: While st [1 ]= ‘B’ Delete(st,1,1); Write(st); a ABBA b.BBB c.BBABBA d AA Câu 4: Tham số thực khai báo ở: A Trong lời gọi chương trình C Phần khai báo chương trình B Phần đầu chương trình D Phần khai báo chương trình Câu 5: Biến toàn cục khai báo ở: A Phần khai báo chương trình C Phần khai báo chương trình B Trong lời gọi chương trình D.Phần đầu chương trình II TỰ LUẬN: (5 điểm) Câu 1: (1 điểm)- Cho chương trình sau: Program vd; Uses crt; Var i,j,a,b: integer; Procedure KTHK(var a: integer; b:integer); Var i,j: integer; Begin i:=5; j:=5; a:=a+1; b:=b+2; Writeln(i:3,j:3,a:3,b:3); End; BEGIN Clrscr; i:=2; j:=3; a:=1; b:=2; KTHK(a,b); Writeln(i:3,j:3,a:3,b:3); Readln; END - Theo chương trình em điền kết vào phần dấu chấm sau: Biến toàn cục ., Biến cục (1 đ) Tham trị ., Tham biến (1 đ) Tham số hình thức , Tham số thực (1 đ) Lệnh gọi thủ tục , Tên thủ tục (1 đ) Câu 2: (1 điểm) Viết cấu trúc thủ tục? Với hàm thủ tục có khác Câu (1 điểm) Viết chương trình nhập vào hai xâu st1 st2 Kiểm tra ký tự thứ cuối xâu st2 có trùng với ký tự xâu st1 không? Câu 4: (2 điểm) a)Lập trình Thủ tục nhập số nguyên dương nhập từ bàn phím in số vừa nhập b) Viết hàm Tính tích số chia hết cho cho phạm vi từ đến n Trường THPT Cao Bình Họ tên: Lớp: 11…… KIỂM TRA TIẾT Mơn: Tin học Đề I TRẮC NGHIỆM: (Khoanh trịn câu trả lời nhất) Cho st1=’Chu Van An’ st2:=copy(st1,pos(‘V’,st1),5), kết xâu st2 là: a st2= ‘Chu Van’ b xt2=‘u Van an’ c st2= ‘Van An’ d st2= ‘Van A’ Đoạn chương trình sau, cho kết hình gì? Var st:string; Begin St:=’Nguyen Van A’; Delete(st,pos(‘V‘,st)-1,6); Write(st); End a Van A b Nguyen Van A c Nguyen d Cả câu Câu Phát biểu nhất: A Hàm trả giá trị qua tên hàm C Cả A,D B Hàm không trả giá trị qua tên hàm D.Thủ tục không trả giá trị qua tên thủ tục Câu 4: Tham số hình thức khai báo ở: A Phần khai báo chương trình C Phần đầu chương trình B Trong lời gọi chương trình D.Phần khai báo chương trình Câu Cho st:=’abcdefgh’; Delete(st,3,4); Sau thực thủ tục st:=? a ‘abcgh’ b ‘abgh’ c ‘abcgh’ d ‘agh’ II Phần tự luận Câu 1: (1 điểm)- Cho chương trình sau: Program vd; Uses crt; Var i,j,a,b: integer; Procedure KTHK(var a: integer; b:integer); Var i,j: integer; Begin i:=5; j:=5; a:=a+1; b:=b+2; Writeln(i:3,j:3,a:3,b:3); End; BEGIN Clrscr; i:=2; j:=3; a:=1; b:=2; KTHK(a,b); Writeln(i:3,j:3,a:3,b:3); Readln; END - Theo chương trình em điền kết vào phần dấu chấm sau: Biến toàn cục ., Biến cục (1 đ) Tham trị ., Tham biến (1 đ) Tham số hình thức , Tham số thực (1 đ) Lệnh gọi thủ tục , Tên thủ tục (1 đ) Câu 2: (1 điểm) Viết chương trình nhập vào hai xâu st1 st2 Kiểm tra ký tự thứ gần cuối xâu st1 có trùng với ký tự xâu st2 không? Câu (1 điểm) Viết cấu trúc hàm ? Với hàm thủ tục có khác ? Câu 4: (2 điểm) a)Lập trình Thủ tục nhập số nguyên dương nhập từ bàn phím in số vừa nhập b) Viết hàm Tính tổng số chia hết cho cho phạm vi từ đến n