Câu hỏi:

Cho xâu kí tự sau: s:= ‘Truyen Kieu-Nguyen Du’

Lệnh nào sau đây cho kết quả ‘Truyen Kieu’

A. copy(s, 1, 11);

B. copy(s, 1, 12);

C. delete(s, 1, 11);

D. delete(s,1, 12);

Câu 1:

Để phân biệt giữa tham biến và tham trị, trước tham biến người ta dùng từ khoá:

A. Var

B. Type

C. Begin

D. Const

Câu 2:

Khai báo 2 biến xâu a, b nào sau đây là đúng:

A. var a, b : string[275];

B. var a, b : string[27];

C. var a, b = string;

D. var a. b : string;

Câu 3:

Muốn khai báo x, y là tham số biến (x, y thuộc kiểu integer) trong thủ tục có tên là “Hoan_doi” thì khai báo nào sau đây là đúng:

A. Procedure Hoan_doi (y : integer; Var x : integer);

B. Procedure Hoan_doi (x : integer; Var y : integer);

C. Procedure Hoan_doi (Var x, y : integer);

D. Procedure Hoan_doi (x, y : integer);

Câu 4:

Cho s = ‘ABCDEF’, hàm copy (s, 2, 3) cho giá trị là:

A. ‘ABC’

B. ‘BCD’

C. ‘CDE’

D. ‘DEF’

Câu 5:

Cho đoạn chương trình sau:

Var g:text;

I:integer;

Begin

 Assign(g, ‘C:\DLA.txt’);

 Rewrite(g);

 For i:=1 to 10 do

 If i mod 2 <> 0 then write(g, i);

 Close(g);

 Readln

End.

Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?

A. 2; 4; 6; 8;10

B. 1; 3; 5; 9

C. 1; 3; 5;7; 9

D. 4; 6; 8;10

Câu 6:

Giả sử ta có hàm max(A, B: integer) : integer; để tìm số lớn hơn trong hai số A và B. Cần sử dụng hàm max trên như thế nào để tìm được số lớn nhất trong ba số A, B, C?

A. max(A; B; C);

B. max(A; max(B, C);

C. max(A, B, C);

D. max(max(A, B),C);