TRẮC NGHIỆM KIỂU MẢNG | TIN HỌC PASCAL LỚP 11

Tự làm xem mình được bao nhiêu nhé

Đáp án ở trang (nhấp vào link) ĐÁP ÁN TRẮC NGHIỆM KIỂU MẢNG

1. Phát biểu nào sau đây về mảng một chiều là đúng?

A. Là tập hợp hữu hạn các phần tử có cùng kiểu dữ liệu

B. Chỉ là tập hợp các số nguyên

C. Mảng không chứa các kí tự là chữ cái

D. Là tập hợp vô hạn các phần tử có cùng kiểu dữ liệu

2. Tham chiếu đến phần tử thứ i của mảng D được xác định bởi:

A. D[',i',]

B. D['i']

C. D[i]

D. D(i)

3. Khi tính diện tích S của tam giác biết độ dài ba cạnh?

A. Var a,b,c: Byte ; S: Real;

B. Var a,b,c,S: Integer;

C. Var a,b,c,S: Byte;

D. Var a,b,c: Byte; S: Word;

4. Biểu thức điều kiện để kiểm tra một phần tử thứ i của mảng A có nằm trong (-5;10)?

A. (A[i] > -5) or (A[i] < 10)

B. (A[i] < -5) and (A[i] >10 )

C. (-5 < A[i] < 10)

D. (A[i] > -5) and (A[i] < 10)

5. Trong Pascal, xâu không có kí tự nào được gọi là:

A. Xâu rỗng

B. Xâu số

C. Xâu không hợp lệ

D. Xâu kí tự trắng

6. Cho S= 'Thu do Ha Noi', thủ tục Delete(S,1,6); cho kết quả:

A. 'THa Noi'

B. ' Ha Noi'

C. 'Thu do'

D. 'Ha Noi'

7. Đoạn chương trình sau thực hiện việc gì? ('  ' là kí tự trắng)

X:= length(S);

For i:= X downto 1 do

If S[i] = '  ' then Delete(S,i,1); 

A. Xóa hết dấu cách trong xâu S

B. Xóa dấu cách đầu tiên trong xâu S

C. Xóa dấu cách cuối cùng trong xâu S

D. Xóa dấu cách thừa trong xâu S

8. Đoạn chương trình sau:

M:=1;

for i:= 1 to 5 do M:= M * 1;

write(M);

cho biết kết quả?

A. 15

B. 5

C. 0

D. 120

9. Câu lệnh nào thực hiện in xâu S theo thứ tự ngược lại (ví dụ: abcd thì in ra màn hình là dcba)

A. For i:= 1 to length(S) do write(S[i]);

B. For i:= 1 to length(S) do writeln(S);

C. For i:= length(S) downto 1 do write(S);

D. For i:= length(S) downto 1 do write(S[i]);

10. Câu lệnh FOR DO dạng lùi có dạng:

A. For <biến đếm> := <chỉ số cuối> downto <chỉ số đầu> do <câu lệnh>;

B. For <biến đếm> := <chỉ số đầu> to <chỉ số cuối> do <câu lệnh>;

C. For <biến đếm> := <chỉ số cuối> to <chỉ số đầu> do <câu lệnh>;

D. For <biến đếm> := <chỉ số cuối> downto <chỉ số đầu> do; <câu lệnh>

11. Trong Pascal, hàm Length(S) cho kết quả là gì?

A. Số ký tự của xâu không tính dấu cách cuối cùng

B. Độ dài tối đa của xâu S khi khai báo

C. Độ dài hiện có của xâu S

D. Số ký tự hiện có của xâu S không tính các dấu cách

12. Đoạn chương trình sau là gì:

for i:= 10 down 1 do write (i,' ');

A. 2 4 5 6 7 8

B. 1 2 3 4 5 6 7 8 9 10

C. Câu lệnh sai

D. 10 9 8 7 6 5  4 3 2 1

13. Trong lệnh FOR ... DO ... , biến đếm có:

A. Kiểu dữ liệu là số nguyên, có gán giá trị đầu và cuối

B. Gán giá trị đầu và cuối

C. Kiểu mảng một chiều

D. Kiểu dữ liệu là số thực, có gán giá trị đầu và cuối

14. Đoạn chương trình:

S := 'Hue-Sai Gon-Ha Noi';

Delete(S,1,12);

kết quả là:

A. 'Ha Noi'

B. 'Hue-Sai Gon'

C. 'Ha NoiHue-Sai Gon'

D. '-Ha Noi'

15. Biểu thức nào sau đây là biểu thức điều kiện?

A. a mod 2

B. a mod k = 0

C. 'a mod 2 <>0'

D. A + B

16. Khai báo biến kiểu xâu nào là không hợp lệ?

A. Var St: String[256];

B. Var St: String[10];

C. Var St: String;

D. Var St: String[0];

17. Cho xâu S = 'Ha Noi-Viet Nam'. Hàm Length(S) trả về giá trị là:

A. 14

B. 16

C. 15

D. 13

18. Khai báo biến kiểu mảng một chiều gồm 10 phần tử số nguyên:

A. Var mang: array[0..10] of integer;

B. Var mang: array(0..10) of integer;

C. Var mang: array[0...10] of integer;

D. Var mang: array[0..10] of integer

19. Kết quả của đoạn chương trình sau:

d := 0;

for i:= 1 to length(S) do

if S[i] = '  ' then d := d + 1;

A. Xóa các kí tự số

B. Đếm các kí tự có trong xâu

C. Đếm số dấu cách có trong xâu

D. Xóa đi các dấu cách trong xâu

20. Cho s1='Que huong', s2='Viet Nam'. Để có xâu 'Que huong Viet Nam' ta thực hiện:

A. insert(s2,s1,8);

B. insert(s1,s2,8);

C. s1 + '  ' + s2

D. s1 + s2