PHẦN TRẮC NGHIỆM Câu 1: Các khai báo biến mảng 2 chiều nào sau đây là không hợp lệ A.. ; Muốn biến Max lưu gía trị lớn nhất của mảng A thì cần khai báo biến Max kiểu gì vào chỗ..[r]
(1)ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 A PHẦN TRẮC NGHIỆM Câu 1: Các khai báo biến mảng chiều nào sau đây là không hợp lệ A Var a: array [1 10, 10] of real; D Var a: array [1 m, n] of real; với m, n là hằng; B Var a: array [1 10] of array [0 10] of real; C Var a: array [1 m, n] of real; với m, n là biến; Câu 2: Chọn khai báo đúng : A Var A: array[1 10] of integer; B Var A= array[1 10] of integer; C Var A:= array[1 10] of integer; D Var A: array[1,10] of integer; Câu 3: Cho khai báo: Var A: Array[1 4] of Real; i : Integer ; Ðể nhập liệu cho A, chọn câu nào : a) For i:=1 to Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); b) For i:=1 to Readln(‘ Nhập A[‘, i, ‘]:’); c) For i:=1 to Begin Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); End; d) Write(‘ Nhập A:’); Readln(A); Câu 4: Cho khai báo biến : Var A : array[1 5] of Integer; Chọn lệnh đúng : A A[1] := 4/2 ; B A[2] := -6 ; C A(3) := ; D A := 10 ; Câu 5: Trong khai báo sau còn bỏ trống chỗ, vì chưa xác định kiểu liệu biến Max : Var A: Array[a d] of Real ; Ch : Char ; Max : ; Muốn biến Max lưu gía trị lớn mảng A thì cần khai báo biến Max kiểu gì vào chỗ A Char B Integer C String D Real Câu 6: Cho khai báo: Var A: Array[1 4] of Integer ; i : Integer ; Sau thực các lệnh : For i:=1 to A[i]:= i; For i:=1 to A[i]:= A[i]+1; thì mảng A có gía trị là : A A[1]=1, A[2]=2, A[3]=3, A[4]=4 B A[1]=2, A[2]=3, A[3]=4, A[4]=5 C A[1]=0, A[2]=1, A[3]=2, A[4]=3 D A[1]=1, A[2]=1, A[3]=1, A[4]=1 Lop11.com (2) ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 Câu 7: Khai báo nào đúng : A Var A : array[1 n,1 m] of integer; B Const n=2; m=3; Var A: array[1 n,1 m] of integer; C Var n, m : integer ; A: array[1 n,1 m] of integer; D Var A: array[3, 2] of Integer; Câu 8: Cho khai báo : Var A : array[1 2,1 3] of Real; i, j : integer; Ðể nhập liệu cho ma trận A, chọn : A Write(‘ Nhập A:’); Readln(A) ; B For i:=1 to Readln(A[i, j]); C For i:=1 to For j:=1 to begin write(‘Nhập A[‘, i, j, ‘]:’); readln(A[i, j]); end; D For i:=1 to For j:=1 to write(‘Nhập A[‘, i, j, ‘]:’); readln(A[i, j]); Câu 9: Cho khai báo : Var A : array[1 2,1 3] of Real; i, j : integer; Max : Real; Ðể tìm số lớn ma trận A, chọn câu nào : A Max:=A[1,1]; If Max < A[i,j] then Max:=A[i,j]; B Max:=A[1,1]; For i:=1 to if Max < A[i,j] then Max:=A[i,j]; C A[1,1]:=Max ; For i:=1 to For j:=1 to if Max< A[i,j] then A[i,j]:=Max; D Max:=A[1,1]; For i:=1 to For j:=1 to if Max < A[i,j] then Max:=A[i,j]; Câu 10: Khi chạy chương trình : Var A : array[1 2,1 3] of integer; i, j, S : integer; Begin A[1,1]:= ; A[1,2]:= -1 ; A[1,3]:= -4 ; A[2,1]:= -9 ; A[2,2]:= ; A[2,3]:= ; S:=0; Lop11.com (3) ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 for i:=1 to for j:=1 to If A[i,j] < then S:=S+1; Write(S); End Kết qủa in gía trị S là : A B -9 C D Câu 11 Cho đoạn lệnh x:=5; y:=4; writeln('x+y'); Kết xuất màn hình là: A B C D x+y Câu 12 Cho đoạn lệnh A[1]:=5; A[2]:=4; A[3]:=9; A[4]:=8; for i:=4 downto write(A[i]:4); A B C D Câu 13 Trong NNLT Pascal, cho khai báo sau Var b:array[1 10] of integer; Hãy chọn lệnh gán đúng các lệnh sau đây A b[5]:=6.5; B b:=8; C b[1]:=5; D b[11]:=8; Câu 14 Đoạn lệnh For i: = To n Do Begin Write('A[',i,']='); Read(A[i]); End; thông thường dùng để: A Nhập liệu cho mảng chiều B Nhập liệu cho mảng hai chiều C Nhập liệu cho ghi D Nhập liệu cho xâu Câu 15 giá trị biến gt đoạn chương trình sau: pt:=1; n:=5; while n<5 pt:=gt+1; A B C D Câu 16 Cho mảng A gồm các phần tử: 3; -7; 9; 5; -3; 6; 8; 17; 0; -15 Cho biết giá trị m sau đoạn chương trình: m:=A[1]; For i:=1 to 10 If A[i] > m then m := A[i]; A B -15 C 17 D Câu 17 Cho đoạn lệnh sau: Const n= 100; Var A: Array[1 n] of Byte; Kqua:byte; Begin …… For i: = To n Do Lop11.com (4) ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 Kqua:=Kqua+A[i]; End; Chọn phương án em cho là đúng chạy đoạn chương trình trên A Tính tổng các phần tử mảng chiều B Tính tích các phần tử mảng chiểu C Sai mặt ngữ nghĩa D Tính tổng các phần tử mảng hai chiều Câu 18 Đoạn lệnh sau dùng để: Var St : String; Begin Write('st = '); Read(st); End; A Nhập liệu cho ghi B Nhập liệu cho xâu C Nhập liệu cho mảng chiều D Nhập liệu cho mảng hai chiều Câu 19 Cho đoạn lệnh sau Gtri:=A[1]; For i:=2 To n Do If A[i]<Gtri Then Gtri:=A[i]; A Để tìm giá trị không chia hết cho dãy B Để tìm giá trị dãy C Để tìm giá trị chia hết cho dãy D Để tìm giá trị max dãy Câu 20 Khai báo biến mảng chiều trực tiếp Pascal A Var <tên biến bảng>: array[kiểu số] of <kiểu phần tử>; B Type <tên biến bảng>: array[kiểu số] of <kiểu phần tử>; C Var <tên biến bảng>: array[kiểu số] : <kiểu phần tử>; D Var <tên biến bảng>: array[kiểu hàng, kiểu số cột] of <kiểu phần tử>; Câu 21 Đoạn lệnh sau dùng để: Const n= 100; Var A: Array[1 n] of Byte; Begin For i: = To n Do Write(A[i]); Writeln; End A In giá trị mảng chiều màn hình B In giá trị ghi màn hình C In giá trị mảng hai chiều màn hình D In giá trị xâu màn hình Câu 22 Khai báo biến mảng hai chiều trực tiếp Pascal A Type <tên biến bảng>: array[chỉ số hàng, số cột] of <kiểu phần tử>; B Var <tên biến bảng>: array[chỉ số hàng, số cột] : <kiểu phần tử>; Lop11.com (5) ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 C Var <tên biến bảng>: array[chỉ số hàng] : <kiểu phần tử>; D Var <tên biến bảng>: array[chỉ số hàng, số cột] of <kiểu phần tử>; Câu 23 Khi làm việc với các phần tử mảng chiều, thường dùng vòng lặp ……… để duyệt A Không cần dùng vòng lặp nào B While Do C For Do D Vòng lặp For Do Câu 24 Kết biến s sau thực đoạn chương trình sau : s:=1; For i:=1 To 10 Do s:=s+i; A 56 B 55 C 57 D 58 Câu 25 Kết i sau thực đoạn chương trình sau : i:=25; i:=sqrt(i)+1; i:=i+1; A B 10 C 25 D Câu 26: Kết đoạn chương trình sau là: Var a, b :integer; Begin a:=10; b:=11; If a<b then write(-1) else write(1); End A -1 B C Một giá trị khác D Chương trình bị lỗi không thể chạy Câu 27: Giá trị s1 và s2 là ? Var i, s1, s2 :integer; Begin s1:=0; s2:=0; for i:=1 to begin s1:=s1 + 1; s2:= s2 + i; end; writeln(s1, ‘ ’,s2); end A (5,15) B (4,15) C (5, 16) D.(5, 14) Câu 28: Giá trị biến S đoạn chương trình sau là: Var i, j, s :integer; Begin s:=0; for i:=1 to for j:=1 to s:=s + i; writeln(s); end A B C D Lop11.com (6) ĐỀ CƯƠNG ÔN TẬP TIN HỌC 11 HỌC KỲ II NĂM HỌC 2009 - 2010 Câu 29: Giá trị biến i là? Var i :integer; Begin i:=10; while i>0 i:= i – 1; writeln(i); end A B C D Câu 30: giá trị biến I và dem đoạn chương trình sau là: Var i,dem: integer; Begin I:=10; dem:=0; While i>0 Begin i:=i – 1; dem:=dem+1; end; writeln(i, ‘ ‘, dem); end A (0, 10) B (10, 0) C (1, 10) D (10, 1) B PHẦN TỰ LUẬN I Kiểu liệu mảng Viết chương trình nhập vào mảng chiều gồm n phần tử nguyên Tính tổng các phần tử có mảng đưa màn hình Lop11.com (7)