Câu 4: 2 điểm aLập trình Thủ tục nhập 3 số nguyên dương nhập từ bàn phím và in ra 3 số vừa nhập b Viết hàm Tính tích các số đó chia hết cho 2 và cho 7 trong phạm vi từ 2 đến n... TRẮC NG[r]
(1)Trường THPT Cao Bình Họ và 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 đúng nhất) 1.Công thức nào sau đây là đúng? (st1, st2 các biến kiểu xâu và m, n các 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’ và st2= ‘Hoang Van Huy’, sau thực lệnh Pos(st1,st2) thì kết bao nhiêu? a b c.9 d.10 Cho chuỗi st:=’ BBBABBA’; Kết in là gì 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 chính Câu 5: Biến toàn cục khai báo ở: A Phần khai báo chương trình chí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 trên em hãy điền kết vào phần dấu chấm sau: Biến toàn cục là ., Biến cục là (1 đ) Tham trị là ., Tham biến là (1 đ) Tham số hình thức là , Tham số thực là (1 đ) Lệnh gọi thủ tục là , Tên thủ tục là (1 đ) Câu 2: (1 điểm) Viết cấu trúc thủ tục? Với hàm và thủ tục có gì khác Câu (1 điểm) Viết chương trình nhập vào hai xâu st1 và st2 Kiểm tra ký tự thứ cuối cùng xâu st2 có trùng với ký tự đầu tiên 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 và in số vừa nhập b) Viết hàm Tính tích các số đó chia hết cho và cho phạm vi từ đến n (2) Trường THPT Cao BìnhKIỂM TRA TIẾT Họ và tên: Môn: Tin học Lớp: 11…… I TRẮC NGHIỆM: (Khoanh tròn câu trả lời đúng nhất) Cho st1=’Chu Van An’ và 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 trên màn hình là gì? Var st:string; B egin S t:=’Nguyen Van A’; D elete(st,pos(‘V‘,st)-1,6); W rite(st); E nd a Van A b Nguyen Van A c Nguyen đúng d Cả câu Câu Phát biểu nào đúng nhất: A Hàm luôn trả giá trị qua tên hàm C Cả A,D đúng B Hàm không trả vềĐề một2giá 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 chính Câu Cho st:=’abcdefgh’; Delete(st,3,4); Sau thực thủ tục trên st:=? a ‘abcgh’ b ‘abgh’ c ‘abcgh’ d ‘agh’ 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); 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; Writeln(i:3,j:3,a:3,b:3); Readln; END - Theo chương trình trên em hãy điền kết vào phần dấu chấm sau: Biến toàn cục là , Biến cục là (1 đ) Tham trị là , Tham biến là (1 đ) Tham số hình thức là , Tham số thực là (1 đ) Lệnh gọi thủ tục là , Tên thủ tục là (1 đ) Câu 2: (1 điểm) Viết chương trình nhập vào hai xâu st1 và st2 Kiểm tra ký tự thứ gần cuối xâu st1 có trùng với ký tự đầu tiên xâu st2 không? Câu (1 điểm) Viết cấu trúc hàm ? Với hàm và thủ tục có gì 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 và in số vừa nhập b) Viết hàm Tính tổng các số đó chia hết cho và cho phạm vi từ đến n (3)