Tên kiểu mảngchỉ số phần tử Câu 7: 1 điểm Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây thể hiện là cú pháp câu lệnh lặp với số lần chưa biết trước.. Phần trả lời: Câu Phương..[r]
(1)SỞ GD&ĐT THỪA THIÊN HUẾ TRƯỜNG THPT HƯƠNG VINH KIỂM TRA 15 phút - NĂM HỌC 2011 - 2012 Môn: Tin Học - LỚP…………… Họ tên: ………………………………… Câu 1:(1 điểm) Cú pháp khai báo kiểu liệu xâu nào đúng: (a) Var <tên biến>= String[độ dài lớn nhất]; (b) Var <tên biến>:Array[độ dài lớn nhất]; (c) Var <tên hằng>:String[độ dài lớn nhất]; (d) Var <tên biến>:String[độ dài lớn nhất]; Câu 2: (1 điểm) Trong ngôn ngữ pascal xâu không có kí tự nào gọi là? (a) Xâu trắng (b) Xâu không (c) Xâu rỗng (d) Không phải là xâu kí tự Câu 3: (1 điểm) Trong ngôn ngữ lập trình Pascal, cú pháp câu lệnh lặp với số lần chưa biết trước là? (a) For < Biến đếm>:=<giá trị đầu> to <giá trị cuối> do<câu lệnh>; (b) For < Biến đếm>:=<giá trị cuối> downto <giá trị đầu> do<câu lệnh>; (c) While <Điều kiện> do< câu lệnh>; (d) a và b đúng Câu 4: (1 điểm) Cho xâu s= ‘tin hoc’; Hàm length(s) cho kết quả là? (a) (b) (c)6 Câu 5: (1 điểm) Câu lệnh sau cho kết quả gì? st:= ‘Khoa’+ ‘Hoc’; (a) st= ‘KhoaHoc’ (b) st= ‘Khoa Hoc’ (c) st=’Khoahoc’ (d) st=’Khoa hoc’ Câu (1 điểm) Chương trình sau làm gì? While pos(‘aa’,st)>0 Begin vt:=pos(‘aa’,st); delete(st,vt,2);insert(‘bb’,st,vt);end (a) Thay tất cả cụm ‘aa’trong xâu st bởi cụm ‘bb’ (b) Xóa tất cả các cụm ‘aa’ xâu st (c) Thay cụm ‘aa’trong xâu st bởi nhiều cụm ‘bb’ (d)7 (2) (d) Thay nhiều cụm ‘aa’trong xâu st bởi cụm ‘bb’ Câu (1 điểm)Cho xâu s= ‘hanoi vietnam’ kết quả hàm pos(‘vietnam’,s) cho kết quả là? (a) (b) (c) (d) Câu (1 điểm) Cho xâu s= ‘tin hoc’ Kết quả hàm delete(s,4,2) cho kết quả là? (a) S= ‘tin c’ (b) S= ‘toc’ (c) S= ‘tin oc’ (d) S= ‘tinc’ Cho chương trình sau: Var i , k:byte; a :string; Begin writeln(‘nhap xau a’) (1) readln(a); (2) k:=length(a); (3) for i:=k downto write(a[i]); (4) readln (5) End Câu (1 điểm) Chương trình trên báo lỗi ở các dòng nào? (a) 1, 2,5 (b) 1, 4,5 (c) (d) Câu 10 (1 điểm) Chương trình trên thực công việc gì? (a) Nhập vào xâu a (b) Nhập vào xâu a rồi in xâu đảo ngược của xâu a màn hình (c) Tìm độ dài của xâu a (d) Nhập vào xâu a rồi in xâu đó màn hình Phần trả lời: Câu Phươn g án trả lời 10 (3) SỞ KIỂM TRA 15 phút - NĂM HỌC 2011 - 2012 GD& ĐT THỪ A THIÊ N HUẾ TRƯ Môn: Tin Học - LỚP…………… ỜNG Họ tên: ………………………………… THP T HƯƠ NG VINH Câu 1: (1 điểm) Cách khai báo trực tiếp kiểu liệu mảng chiều: (a) Var <tên biến mảng>:array[kiểu số] of <kiểu phần tử>; (b) Var <tên biến mảng>:string[kiểu số] of <kiểu phần tử>; (c) Var <tên biến>:Array[độ dài lớn nhất]; (d) Var <tên biến mảng> = array[kiểu số] of <kiểu phần tử>; Câu 2: (1 điểm) Ý nghĩa câu lệnh lặp: While <điều kiện> <câu lệnh >; (a) Trong <điều kiện> sai thì câu lệnh còn được thực (b) Trong <điều kiện> đúng thì câu lệnh còn được thực (c) Nếu <điều kiện> đúng thì câu lệnh được thực (d) Nếu <điều kiện> sai thì câu lệnh được thực Câu 3: (1 điểm) Cho biết kết quả của lệnh: Insert('hoc ', 'Tin lop 11', 5); (a) 'hoc tin lop 11' (b) 'lop 11 tin hoc' (c) 'Tinhoclop 11' (d) 'Tin hoc lop 11' Câu 4: (1 điểm) Cú pháp khai báo kiểu liệu xâu: (a) Const <tên biến>:String[độ dài lớn nhất]; (b) Var <tên biến>:Array[độ dài lớn nhất]; (c) Var <tên hằng>:String[độ dài lớn nhất]; (d) Var <tên biến>:String[độ dài lớn nhất]; Câu 5: (1 điểm) Chương trình sau thực việc gì? Var A, B: String[50]; Begin Write('Nhap vao xau A = '); readln(A); Write('Nhap vao xau B = '); readln(B); If Length(A) < Length(B) then write(A) else write(B); Readln; End (a) Nhập vào hai xâu, xuất màn hình xâu dài (4) (b) Nhập vào hai xâu, xuất màn hình xâu ngắn (c) Nhập vào hai xâu, xuất màn hình hai xâu vừa nhập (d) Nhập vào hai xâu, xuất màn hình xâu nhập vào sau Câu (1 điểm) Cách tham chiếu đến phần tử của mảng? (a) Tên biến mảng[chỉ số phần tử ]; (b) Tên biến mảng(chỉ số phần tử); (c) Tên kiểu mảng[chỉ số phần tử ] (d) Tên kiểu mảng(chỉ số phần tử) Câu 7: (1 điểm) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây thể là cú pháp câu lệnh lặp với số lần chưa biết trước? (a) For < Biến đếm>:=<giá trị đầu> to <giá trị cuối> do<câu lệnh>; (b) For < Biến đếm>:=<giá trị cuối> downto <giá trị đầu> do<câu lệnh>; (c) While <Điều kiện> do< câu lệnh>; (d) a và b đúng Câu 8: (1 điểm) Xâu S có giá trị là: 'Viet Nam que huong toi' kết quả của hàm Length(S) là: (a) 24 (b) 18 (c) 23 (d) 22 Câu 9: (1 điểm) Mảng A gồm N = phần tử: Các lệnh sau: T := 0; For i := to N T := T + A[i]; cho kết quả là: (a) T = 28 (b) T = 20 (c) T = (d) T = Câu 10: (1 điểm) Chọn khai báo đúng các khai báo sau: (a) Var S, T : String (b) Var S, T : Xtring[255]; (c) Var S, T : String[300]; (d) Var S, T : String[200]; _HẾT _ Phần trả lời: Câu Phương 10 (5) án trả lời (6) SỞ GD&ĐT THỪA THIÊN HUẾ TRƯỜNG THPT HƯƠNG VINH KIỂM TRA 15 phút - NĂM HỌC 2011 - 2012 Môn: Tin Học - LỚP…………… Họ tên: ………………………………… Câu 1: Cú pháp để khai báo trực tiếp biến mảng chiều là: (a) Var <tên biến mảng> : array [kiểu số] of <kiểu phần tử>; (b) Type <tên biến mảng> : array [kiểu sô] of <kiểu phâng tử>; (c) Var <tên biến mảng> : array [kiểu phần tử] of <kiểu sô>; (d) Var <tên biến mảng> : array [kiểu sô] : [kiểu phần tử]; Câu 2:Trong pascal để tìm giá trị lớn của mảng a có n phần tử ta dùng đoạn lệnh nào? (a) Max :=a[1]; For i:=1 to n if a[i]<max then max:=a[i]; (b) Max :=a[1]; For i:=1 to n if a[i]<=max then max:=a[i]; (c) Max :=a[1]; For i:=1 to n if a[i]>max then max:=a[i]; (d) Max :=a[1]; For i:=1 to n if a[i]>=max then max:=a[1]; Câu 3: Trong ngôn ngữ lập trình Pascal, cú pháp câu lệnh nào sau đây là đúng (a) Type 1mang=array[1 100] of integer; (b) Type 2mang=Array[1-100] of integer; (c) Type mang1=Array[1…100] of integer; (d) Type mang2=Array[1 100] of integer; Câu 4: Cho đoạn lệnh sau: A[1] := 5; A[2] := 4; A[3] :=9; A[4] := 8; For i:= downto Write (A[i]); Kết quả xuất màn hình là: (a) 8945 (b) 1234 (c) 5498 (d) 4321 Câu 5: Đoạn lệnh For i:= to n Begin Write (‘A[‘, i, ‘]=’); Readln (A[i]); End; Dùng để: (a) Nhập liệu cho mảng chiều (b) Xuất liệu cho mảng chiều (c) Nhập liệu cho xâu kí tự (d) Xuất liệu cho xâu kí tự (7) Câu 6: Phát biểu nào sau đây là sai nói khái niệm xâu (a) Xâu là dãy các kí tự mã ASCII (b) Mỗi kí tự được gọi là phần tử của xâu (c) Xâu rỗng là xâu chứa kí tự trắng (d) Số lượng kí tự xâu được gọi là độ dài của xâu Câu 7: Để khai báo biến xâu trực tiếp ta sử dụng cú pháp nào sau đây (a) Var <tên biến>: <tên kiểu>; (b) Var <tên biến>: string[độ dài lớn của xâu]; (c) Var <tên biến>=string[độ dài lớn của xâu]; (d) Var <tên biến>=<tên kiểu>; Câu 8: Thực thủ tục: Delete (‘Truong THPT HUONG VINH’, 8,5) là: (a) ‘THPT HUONG VINH’ (b) ‘Truong THPT’ (c) ‘HUONG VINH’ (d) ‘Truong HUONG VINH’ Câu 9: Thủ tục Delete(St,p,n) thực việc: (a) Xóa n kí tự của biến xâu St bắt đầu từ vị trí p (b) Xóa p kí tự của biến xâu St bắt đầu từ vị trí n (c) Xóa các kí tự của biến xâu St bắt đầu từ vị trí p đến vị trí n (d) Xóa các kí tự của biến xâu St bắt đầu từ vị trí n đến vị trí p Câu 10: Trên liệu kiểu xâu có các phép toán nào? (a) Phép toán so sánh và phép gán (b) Phép so sánh và phép nối (c) Phép gán và phép nối (d) Phép gán, phép nối và phép so sánh Phần trả lời: Câu Phương án trả lời 10 (8)