C©u 62: B Trong ngôn ngữ lập trình Pascal, để in một xâu ký tự ra màn hình theo thứ tự ngược lại của các ký tự trong xâu(vd: abcd thì in ra là dcba), đoạn chương trình nào sau đây thực [r]
(1)ĐỀ CƯƠNG ƠN THI HỌC KÌ II NĂM HỌC 2011 - 2012 M«n : Tin häc - Líp 11
** Lu ý: HS học theo nội dung đề cơng này, GV chọn 30 câu để thi học kỳ 2, thời gian thi 45 phút
C©u 1: B
Cách viếtnào sau khai báo mảng chiều? A Var <Kiểu số>: array[tên biến mảng] of <kiểu phần tử>;
B Var <tên biến mảng>: array[kiểu số] of <kiểu phần tử>; C Var <Array> of <kiểu phần tử>; D Var <Kiểu phần tử>: array[kiểu số] of <tên biến mảng>;
C©u 2: D Procedure từ khóa dùng để khai báo cho:
A Mảng B Bản ghi C Hàm D Thủ tục C©u 3:
C Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau thực cơng việc: Readln(s); k:= length(S); for i:= k downto write(S[i]);
A in hình xâu S B in hình độ dài xâu S
C in hình xâu S đảo ngược D đưa hình xâu S C©u 4:
B A Var Hoten: record; B Var Hoten: String[100]; Cách viết sau khai báo kiểu xâu?
C Var Hoten: Char[30]; D Var Hoten: Array[1 30] of Char; C©u 5:
C Chọn phát biểu phát biểu nói lợi ích việc sử dụng chương trình con: A Khơng có lợi ích B Viết để chương trình gọn hơn C Tránh việc lặp đi, lặp lại dãy lệnh
D Hỗ trợ việc viết chương trình có cấu trúc cấu trúc lặp, rẽ nhánh C©u 6: B Với khai báo A: array[1 100] of integer; việc truy xuất đến phần tử thứ sau:
A A(5) B A[5] C A5 D A C©u 7:
A Thủ tục đóng tệp có dạng:A Close(<biến tệp>); B Close(<tên tệp>); C Close; D Close all; C©u 8:
D Mở tệp để ghi liệu, ta sử dụng thủ tục:A Reset(<tên tệp>); B Reset(<biến tệp>); C Rewrite(<tên tệp>); D Rewrite(<biến tệp>); C©u 9:
A A Mở tệp để đọc B Đóng tệp C Mở tệp vừa đọc vừa ghi D Mở tệp để ghi.Lệnh reset(<biến tệp>); dùng để C©u 10:
D A read(<tên tệp>,<danh sách kết quả>); B read(<biến tệp>,<danh sách kết quả>); Để ghi liệu vào tệp văn bản, ta sử dụng thủ tục:
C write(<tên tệp>,<danh sách kết quả>); D write(<biến tệp>,<danh sách kết quả>); C©u 11:
B A read(<tên tệp>,<danh sách biến>); B read(<biến tệp>,<danh sách biến>); Để đọc liệu từ tệp văn bản, ta sử dụng thủ tục:
C Real(<tên tệp>,<danh sách biến>); D Real(<biến tệp>,<danh sách biến>); C©u 12:
C
Để gán tên tệp cho biến tệp ta sử dụng câu lệnh:
A <biến tệp> := <tên tệp>; B <tên tệp> := <biến tệp>;
C assign(<biến tệp>,<tên tệp>); D assign(<tên tệp>,<biến tệp>); C©u 13:
B Trong Pascal, để khai báo biến tệp văn ta sử dụng cú pháp:
A Var <tên tệp> : text; B Var <tên biến tệp> : text; C Var <tên tệp>: string; D Var <tên biến tệp>: string; C©u 14:
A 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 : txt; C var f1.txt, f2.txt; D var f1.txt; f2.txt; C©u 15:
D A lưu trữ ROM B lưu trữ RAMDữ liệu kiểu tệp:
C lưu trữ đĩa cứng D lưu trữ nhớ ngồi C©u 16: A Cho s=’123456789’ hàm copy(s,2,3) cho giá trị bằng:
A ‘234’ B 234 C ‘34’ D 34 C©u 17: B Chos=’500 ki tu’, hàm length(s) cho giá trị bằng:
A 500 B C ‘5’ D ‘500’ C©u 18: A Thủ tục insert(‘123’,’abc’,2) cho xâu kết sau đây?
(2)A s=’1256789’ B s=’12789’ C s=’123789’ D s=” C©u 20 B Cho A=’abc’; B=’ABC’; A+B cho kết nào?
A ‘aAbBcC’ B ‘abcABC’ C ‘AaBbCc’ D ‘ABCabc’ C©u 21: B Với khai báo A: array[1 100,1 100] of integer; việc truy xuất đến phần tử sau:
A A(i,j) B A[i,j] C A(i;j) D A[i;j] C©u 22: C Để khai báo biến kiểu xâu ta sử dụng cú pháp nào?
A var <tên biến>:<tên kiểu>; B var <tên biến>=<tên kiểu>;
C var <tên biến>: string[độ dài lớn xâu]; D var <tên biến>= string[độ dài lớn xâu]; C©u 23: A Trong khai báo sau, khai báo đúng?
A var hoten : string[27]; B var diachi : string(100); C var ten= string[30]; D var ho = string(20);
C©u 24: C Trong ngơn ngữ lập trình Pascal, phần tử xâu kí tự mang số là?
A B Do người lập trình khai báo C D Khơng có số C©u 25:
C
Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau thực cơng việc gì? d:=0; For i:= to Length(S)
If (S[i]>=’0’) And (S[i]<=’9’) then d:=d+1;
A Đếm xem có loại kí tự số xâu S B Xóa chữ số có S C Đếm số kí tự kí tự số xâu S D Xóa chữ số S C©u 26:
C A Program B Procedure C Function D VarĐể khai báo hàm Pascal khố C©u 27:
B
Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau thực việc việc sau ( A mảng số có n phần tử)
S:=0; for i:= to n s:= s + A[i];
A In hình mảng A B Tính tổng phần tử mảng A
C Đếm số phần tử mảng D Không thực việc việc C©u 28: A Trong ngơn ngữ lập trình Pascal
A Các phần tử mảng chiều xếp thứ tự theo số
B Các phần tử mảng chiều xếp thứ tự theo giá trị tăng dần C Các phần tử mảng chiều xếp thứ tự theo giá trị giảm dần D Các phần tử mảng chiều khơng thứ tự
C©u 29: B Trong ngơn ngữ lập trình Pascal,………….là dãy hữu hạn phần tử kiểu
A Mảng hai chiều B Mảng chiều C Xâu kí tự D Bản ghi C©u 30: D Trong ngơn ngữ lập trình Pascal, hai xâu kí tự coi nhau
A chúng B độ dài hai xâu
C hai xâu D chúng giống hồn tồn C©u 31: A Trong ngơn ngữ lập trình Pascal, khai báo mảng hai chiều sau cho biết
Var A: array[1 7,1 8] of integer;
A mảng A có hàng, cột phần tử mảng số nguyên B mảng A có hàng, cột phần tử mảng số nguyên C mảng A có hàng, cột phần tử mảng số thực D mảng A có hàng, cột phần tử mảng số thực
C©u 32: B Trong ngơn ngữ lập trình Pascal, mặt cú pháp câu lệnh sau đúng
A War A: array [1 100,1 100] of integer; B Var A: array [1 100,1 100] of integer; C Var A: array [1 100,1 100] of interger; D Var A: array [1 100;1 100] of integer; C©u 33: B Trong ngơn ngữ lập trình Pascal, xâu kí tự là?
A Mảng kí tự B Dãy kí tự bảng mã ASCII C Tập hợp chữ bảng chữ tiếng Anh
D Tập hợp chữ chữ số bảng chữ tiếng Anh
C©u 34: B Trong ngơn ngữ lập trình Pascal, thủ tục Insert(S1, S2, n) thực cơng việc gì? A Chèn thêm xâu S1 vào xâu S2 vị trí n xâu S1
B Chèn thêm xâu S1 vào xâu S2 vị trí n xâu S2
C Chèn xâu S2 vào xâu S1 vị trí n xâu S1 D Đáp án khác C©u 35: B Trong ngơn ngữ lập trình Pascal, hàm Upcase(ch) cho kết là
(3)C©u 36: B Trong ngơn ngữ lập trình Pascal, để xố kí tự xâu kí tự S ta viết A Detele(S, i, 1);{i biến có giá trị bất kì} B Detele(S, 1, 1);
C Detele(S, 1, i);{i biến có giá trị bất kì} D Detele(S, length(S), 1); C©u 37: B Trong ngơn ngữ lập trình Pascal, mảng hai chiều là
A dãy hữu hạn phần tử kiểu B bảng phần tử kiểu C bảng phần tử khác kiểu D Đáp án khác
C©u 38: C Trong ngơn ngữ lập trình Pascal, để in mảng vừa tạo mặt cú pháp câu lệnh đúng: A for i := to n write(‘A[i]:5’); B for i = to n write(‘A[i]:5’); C for i := to n write(A[i]:5); D for i = to n write(A[i]:5); C©u 39: B Trong ngơn ngữ lập trình Pascal, cách khai báo xâu kí tự sau đúng?
A Var S: String[257]; B Var S: String; C Var S: File of String; D Var S: String C©u 40: C Trong ngơn ngữ lập trình Pascal, xâu có độ dài gọi là……
A Xâu không B Xâu trắng C Xâu rỗng D Cả A, B C C©u 41: B Trong ngơn ngữ lập trình Pascal, sau thực xong đoạn chương trình sau, giá trị biến S là
S:=’Ha Noi mua thu’; Detele(S, 7, 8); Insert(‘Mua thu ’, S,1)
A Ha Noi Mua thu B Mua thu Ha noi C Mua thu Ha Noi mua thu D Ha Noi C©u 42: C Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau thực cơng việc gì?
d:=0; For i:= to n
If A[i] mod 2=0 then d:=d+1;
A Tính tổng phần tử mảng chia hết cho B.In hình phần tử mảng chia hết cho C Đếm số phần tử mảng chia hết cho D Đếm số phần tử mảng không chia hết cho C©u 43: D Trong ngơn ngữ lập trình Pascal, có cách khai báo mảng
A B C D C©u 44: C Trong ngơn ngữ lập trình Pascal, hàm cho vị trí xuất xâu S1 xâu S2 là
A Pos(S2, S1) B Pos(S2; S1) C Pos(S1, S2) D Pos(S1; S2)
C©u 45: A Trong ngơn ngữ lập trình Pascal, sau thực câu lệnh Write(Pos(‘tin’,’cau lac bo tin hoc’)) ta có kết quả A 12 B 11 C 10 D 13
C©u 46: B Trong ngơn ngữ lập trình Pascal, sau thực đoạn chương trình sau, kết xâu nào S:=’tin hoc’; Delete(s,4,4);
A ‘hoc’ B.‘tin’ C ‘tin ’ D ‘ hoc’ C©u 47: D Trong ngơn ngữ lập trình Pascal, hàm length(S) cho giá trị
A độ dài xâu S khai báo B độ dài xâu S khơng tính dấu cách C độ dài xâu S khơng tính dấu cách cuối D độ dài xâu S
C©u 48: A Trong ngơn ngữ lập trình Pascal, sau thực xong đoạn chương trình, giá trị S là? S1:= ‘tin hoc’; S2:= ‘cau lac bo ’; Insert(S1, S2,12);
A ‘cau lac bo tin hoc’ B ‘tin hoc cau lac bo’ C ‘Cau lac bo tin hoc’ D ‘tin hoccau lac bo’ C©u 49: C Trong ngơn ngữ lập trình Pascal, xâu kí tự có tối đa
A kí tự B 16 kí tự C 255 kí tự D 256 kí tự C©u 50: D Trong ngơn ngữ lập trình Pascal, với xâu kí tự có phép tốn là?
A Phép cộng, trừ, nhân, chia B Chỉ có phép cộng
C Phép cộng phép trừ D Phép ghép xâu phép so sánh C©u 51: B Mảng chiều là:
A Bảng phần tử khác kiểu B Dãy hữu hạn phần tử kiểu
C Bảng phần tử kiểu D Dãy hữu hạn phần tử khác kiểu C©u 52: C Hàm length(s) có chức năng:
A cho biết vị trí kí tự xâu s B Cho giá trị chữ in hoa xâu s C cho giá tị độ dài xâu s D chép xâu s
C©u 53 A Sau thực đoạn lệnh sau: S:=0; For i:=1 to S:=S+i; S có giá trị là:
A 10 B C D C©u 54: A Cách tham chiếu đến phần tử mảng:
(4)A Bản ghi B Mảng C Thủ tục D Hàm C©u 56: B Cặp từ khóa mở đầu kết thúc chương trình là:
A Begin End B Begin End;
C Begen End C Begin; End; C©u 57: B Để khai báo biến kiểu xâu trực tiếp ta sử dụng cú pháp nào?
A var <tên biến>:<tên kiểu>; B var <tên biến>:string[độ dài lớn xâu]; C var <tên biến>=string[độ dài lớn xâu]; D var <tên biến>=<tên kiểu>; C©u 58: C Trong phát biểu sau, phát biểu sai?
A Xâu khơng có kí tự gọi xâu rỗng; B Có thể tham chiếu đến kí tự xâu C Xâu có chiều dài khơng vượt 250;
D Thao tác nhập xuất liệu kiểu xâu nhập hay xuất giá trị biến kiểu liệu chuẩn; C©u 59: B Cho s=’abcdefghi’ hàm copy(s,2,3) cho giá trị bằng:
A bcd B ‘bcd’ C ‘cd’ D cd C©u 60: A Chos=’Kon Tum Viet Nam’, hàm length(s) cho giá trị bằng:
A 16 B 15 C ‘16’ D ‘15’ C©u 61: C Cho xâus=’abcdefghi’ sau thực thủ tục delete(s,3,4) thì:
A s=’abchi’ B s=’abcdi’ C s=’abghi’ D s=”
C©u 62: B Trong ngơn ngữ lập trình Pascal, để in xâu ký tự hình theo thứ tự ngược lại ký tự xâu(vd: abcd in dcba), đoạn chương trình sau thực việc này?
A For i:=1 to Length(S) Do Write(S[i]); B For i:=Length(S) Downto Write(S[i]); C For i:=Length(S) Downto Write(S); D For i:=1 to Length(S) Div Do Write(S[i]); C©u 63: C Trong ngơn ngữ lập trình Pascal, khai báo khai báo sau sai khai báo xâu kí tự?
A S: String; B X1: String[100]; C S: String[256]; D X1: String[1]; C©u 64: C Dữ liệu kiểu tệp:
A bị tắt máy B Sẽ bị hết tắt điện đột ngột C không bị tắt máy điện D Cả A, B, C sai
C©u 65: D Chương trình sau thực cơng việc gì? Function M(a,b: real): real;
Begin
If a>b then M:=a else M:=b; End;
A Tìm giá trị nhỏ hai số nguyên a, b B Tìm giá trị nhỏ hai số nguyên a, b C Tìm giá trị nhỏ hai số thực a, b D Tìm giá trị lớn hai số nguyên a, b C©u 66: B Trong ngơn ngữ lập trình Pascal, mảng hai chiều là
A dãy hữu hạn phần tử kiểu B bảng phần tử kiểu C bảng phần tử khác kiểu D Đáp án khác
C©u 67: A Trong ngơn ngữ lập trình Pascal, q trình nhập liệu mảng chiều A, để phần tử hiển thị cửa sổ chương trình ta viết lệnh sau:
A Write(‘A[‘,i,’]=’); readln(A[i]); B Write(‘A[i]=’) readln(A[i]); C Write(‘A[‘i’]=’); readln(A[i]); D Write(“A[“,i,”]=”); readln(A[i]); C©u 68: D Trong ngơn ngữ lập trình Pascal, mặt cú pháp câu lệnh sau đúng
A War mang: array [1 100] of integer; B Var mang: array [1…100] of integer; C Var mang: array [1 100] of interger; D Var mang: array [1 100] of integer; C©u 69: B Ta có đoạn chương trình sau(A mảng số có N phần tử)
S:=0; for i:=1 to N if a[i]>0 then S:= S+A[i];
Giả sử n=5 ta có mảng A sau: -1 -6 , sau thực kết A -7 B 11 C D
C©u 70: C Trong ngơn ngữ lập trình Pascal, sau thực đoạn chương trình sau, kết xâu nào S:=’tin hoc 11’; Delete(S,4,4);