Đếm các phần tử không âm Câu 29: Trong các hàm và thủ tục sau, hàm và thủ tục nào cho kết quả là một số nguyên A.. tính tổng các phần tử trong mảng B.[r]
(1)TRƯỜNG THPT TÁN KẾ TỔ TOÁN - TIN Họ, tên thí sinh: Lớp ĐỀ KIỂM TRA TIẾT MÔN: TIN HỌC 11 Thời gian làm bài: 45 phút; (40 câu trắc nghiệm) /03/2013 Mã đề 245 Câu 1: Khẳng định: <chỉ số đầu> lớn <chỉ số cuối>: A Đúng B Sai Câu 2: Khai báo mảng chiều nào sau đây đúng? A var A : array[1 100] of real; B var A : array[1…100] of byte; C var A = array[1 100] of real; D var A = array[1…100] of byte; Câu 3: Mảng chiều là dãy hữu hạn các phần tử có đủ loại kiểu A Đúng B Sai Câu 4: Với khai báo: var A:Array[1 100] of Byte; nhóm lệnh nào dùng để in giá trị A màn hình? A for i:=1 to 100 read(A[i]); B for i:=1 to 100 readln(A[i]); C for i:=1 to 100 writeln(i:5); D for i:=1 to 100 write(A[i]:5); Câu 5: Cho xâu S1:= ‘abcd’ và S2:= ‘ABC’; đó S2 + ‘ ’ + S1 cho kế nào? A 'ABCabcd' B 'abcdABC' C 'ABC abcd' D 'abcd ABC' Câu 6: Cho a:='tan ke' Để in ký tự 'n' ta viết thế nào? A read(a[3]); B read(a); C Write(a[3]); D write(a(3)); Câu 7: Cho xâu S= ‘hoc le’ hàm length(S) kết là : A B C D Câu 8: Khai báo xâu sau đúng /sai? var a= string; A Sai B Đúng Câu 9: Điền vào chỗ trống để được đoạn chương trình đúng min:= ; for i:= to n if a[i]<min then begin min:= a[i]; end; A A B A[ i ] C i D A[1] Câu 10: Điền vào đoạn lệnh cho phù hợp:( biết đây là đoạn đếm phần tử lẻ) dem:=0; for i:=1 to n if a[i] mod <> then ; A dem:=dem+a[i] B dem:= dem + a[1] C dem:= dem + D dem:= dem + Câu 11: Cho xâu S=‘tien hoc le hau hoc van’ hàm Pos(‘le’,S) kết là : A 10 B C 11 D Câu 12: Cho xâu S:= ‘hau hoc van’ hàm Copy(S,5,2) kết là : A 'hau' B 'ho' C 'au h' D 'hoc' Câu 13: Cho đoạn chương tŕnh: T:= a[1]; for i:= to n if a[i] < T then Begin t:= a[i]; end; A tìm giá trị lớn B xếp dãy giảm dần C xếp dãy tăng dần D tìm giá trị nhỏ Câu 14: In xâu đảo ngược xâu a, ta viết x:= length(a); for i:= x downto ……… ; A Write(a) B Readln(a) C Write(a[i]) D Readln(a[i]) Câu 15: Cho xâu A:= ‘Hoa hoc Tro’ và xâu B:= ‘Hoa hoc Tro’ , ta có A=B A Sai B Đúng Câu 16: Các khẳng định nào đúng mảng chiều? A Mảng có số phần tử không đếm được B Các phần tử mảng có thể khác kiểu C Các phần tử mảng có cùng kiểu D Một mảng có thể có nhiều tên khác (2) Câu 17: Khai báo mảng chiều số thực nào sau đây đúng? A var A : array[1 100] of real; B var A : array[1 100] of word; C var A = array[1 100] of word; D var A = array[1 100] of real; Câu 18: Đoạn chương tŕnh sau đây làm gì? for i:=1 to n if a[i] mod <> then write(A[i]:5); A In màn hình các phần tử có số chẵn mảng A B In tất các phần tử mảng A C In màn hình các phần tử chẵn mảng A D Tất sai Câu 19: Câu lệnh nào đúng(Với A là mảng chiều gồm N phần tử số nguyên)? A readln(A); B writeln(A:5); C readln(A[i]); D write(A); Câu 20: Điền nội dung còn thiếu đoạn sau: for i:= to n begin write(‘a[’ ,i, ‘]=’); ……………….; end; A readln(a[i]) B write(a[i]:5) C readln(a[i]:5) D write(a[i]) Câu 21: Khai báo mảng chiều nào sau đây: var A : array[-100 0] of boolean ; A Không hợp lệ B Hợp lệ Câu 22: Cho xâu S= ‘tien hoc le’ thủ tục delete(S, 4,5) kết là : A ‘tien le’ B ‘tie le’ C ‘ hoc’ D ‘hoc le’ Câu 23: Cho khai báo: Var A: array[1 10] of integer; i: integer; Để in màn hình phần tử thứ mảng thực câu lệnh gì ? A Write(‘A[3]’); B Write(‘A[i]’); C Readln(A[3]); D Writeln(A[3]); Câu 24: Cho khai báo: type Tên_mảng:Array[chỉ_số_đầu chỉ_số_cuối] of kiểu_phần_tử; A Sai B Đúng Câu 25: Khai báo xâu sau đúng/sai? Var a: string[255]; A Đúng B Sai Câu 26: Cho x:= length(a); để tham chiếu đến ký tự đầu tiên xâu a, ta chọn: A a(x) B a[x] C a[100] D a[1] Câu 27: Trong ngôn ngữ lập trình Pascal, xâu kí tự có tối đa A 16 kí tự B 256 kí tự C kí tự D 255 kí tự Câu 28: Đoạn chương trình sau thực công việc gì? S:=0; for i:=1 to n if a[i] >= then S:=S+a[i]; A Tính tổng các phần tử dương B Đếm các phần tử dương C Tính tổng các phần tử không âm D Đếm các phần tử không âm Câu 29: Trong các hàm và thủ tục sau, hàm và thủ tục nào cho kết là số nguyên A Pos(S1,S2) B insert(S1,S2,vt) C copy(S,vt,n) D delete(s,vt,n) Câu 30: Khai báo xâu sau đúng/sai? Var a: string[265]; A Đúng B Sai Câu 31: Cho câu lệnh: S:=0; FOR i:=100 DOWNTO DO S:= S + A[i]; thực công việc gì? A tính tổng các phần tử mảng B nhập mảng C đếm các phần tử mảng D in mảng Câu 32: Khai báo nào sau đây tương đương khai báo: var A : array[1 100] of integer; A type Kmang1 : array[1 100] of real; var A : Kmang1; (3) B type Kmang1 = array[1 100] of integer; var A: Kmang1; C type Kmang1 = array[1 100] of real; var A : Kmang1; D type Kmang1 : array[1 100] of integer; var A : Kmang1 ; Câu 33: Giả sử ta có mảng A sau : A: 10 15 20 25 30 25 15 45 50 Để tham chiếu đến phần tử 25 ta truy xuất nào sau : A A(5) B A[25] C A(25) D A[5] Câu 34: Đoạn chương trình sau thực công việc gì? s:=0; for i:= to n if a[i] mod <>0 then s:= s +1; A Tính tổng các số chia hết cho B tính tổng các số không chia hết cho C đếm các số chia hết cho D đếm các số không chia hết cho Câu 35: Ý nghĩa chính đoạn chương trình: If a[i] = ' ' then b:= b+ a[i]; write(b); A tính tổng các phần tử các ký tự không rỗng B in màn hình xâu gồm các ký tự không rỗng C in màn hình xâu gồm các ký tự rỗng D tính tổng các phần tử các ký tự rỗng Câu 36: cho xâu: a:='anh hai' và xâu b:='hoc tot' insert(b,a,1) cho kết quả: A 'anh haihoc tot' B 'hoc tot anh hai' C 'anh hai hoc tot' D 'hoc totanh hai' Câu 37: Để in mảng trên cùng dòng, ta chọn lệnh: A for i:= n downto writeln(a[i]:5); B for i:= n downto readln(a[i]:5); C for i:= to n write(a[i]:5); D for i:= to n readln(a[i]:5); Câu 38: Đếm các phần tử chẵn cho đoạn: for i:= to n if ………… then dem:= dem+1; dùng điều kiện nào? A a[i] mod <>0 B i mod = C i mod <> D a[i] mod = Câu 39: Cho xâu A:='ca nau' B:='ca nanh' phep so sanh nao đúng? A A<B B A=B C A>B D A<>B Câu 40: Các kiểu liệu dùng mảng chiều có thể là: integer, real, boolean A Đúng B Sai - - HẾT -TRÀ LỜI A B C D 21 A B C D 22 23 24 25 26 27 28 29 10 30 11 31 12 32 13 14 15 16 17 18 19 20 33 34 35 36 37 38 39 40 (4)