Bé Sủi

Trong ngôn ngữ lập trình Pascal sau khi thực hiện đoạn chương trình sau:

S:=’Ha Noi mua thu’;

Delete(S,7,8);

Insert(‘Mua thu ’,S,1);

giá trị của biến S là:

• A. Ha Noi Mua thu;

• B. Mua thu Ha Noi mua thu;

• C. Mua thu Ha Noi;

• D. Ha Noi;

Trong ngôn ngữ lập trình Pascal, để xóa ký tự đầu tiên của xâu ký tự S ta viết:

• delete(S,1,1);

• delete(S,1,i); {i là biến có giá trị bất kỳ}

• delete(S, length(S),1);

• delete(1,S,1);

Trong ngôn ngữ lập trình Pascal, để tìm vị trí xuất hiện đầu tiên của xâu ‘hoa’ trong xâu S ta có thể viết bằng cách nào trong các cách sau?

• I:=pos(S1,’hoa’);

• I:=pos(S,’hoa’);

• I:=pos(’hoa’,S);

• I:=pos(‘hoa’,’hoa’);

Trong ngôn ngữ lập trình Pascal, thủ tục Insert(s1, s2, vt) thực hiện công việc gì?

• Chèn thêm xâu s1 vào xâu s2 bắt đầu từ vị trí vt của s1;

• Không thực hiện công việc nào cả;

• Chèn thêm xâu s2 vào xâu s1 bắt đầu từ vị trí vt của s1;

• Chèn thêm xâu s1 vào xâu s2 bắt đầu từ vị trí vt của s2;

Trong ngôn ngữ lập trình Pascal, thủ tục chèn xâu s1 vào xâu s2 bắt đầu từ vị trí vt được viết.

• Insert (s2, s1, vt);

• Insert (s1, s2, vt);

• Insert (s1, vt, s2);

• Insert (vt, s1, s2);

Hãy chọn phương án ghép đúng. Độ dài tối đa của xâu kí tự trong PASCAL là

• 255.

• Tùy ý.

• 65535.

• 256.

Trong ngôn ngữ lập trình Pascal, hàm Upcase(Ch) cho kết quả là:

• Chuyển Ch thành chữ thường;

• Chuyển Ch thành chữ hoa;

• Xâu Ch gồm toàn chữ hoa;

• Xâu Ch toàn chữ thường;

Cho khai báo sau: Var hoten: String; Phát biểu nào dưới đây là đúng?

• Xâu hoten có độ dài lớn nhất là 255;

• Cần phải khai báo kích thước của xâu sau đó;

• Câu lệnh sai vì thiếu độ dài tối đa của xâu;

• Xâu có độ dài lớn nhất là 0;

Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện công việc gì?

d := 0;

for i := 1 to length(S) do

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

• Xoá đi các dấu cách trong xâu;

• Đếm số kí tự có trong xâu;

• Xóa đi các kí tự số.

• Đếm số dấu cách có trong xâu;

Cho str là một xâu kí tự, đoạn chương trình sau thực hiện công việc gì ?

for i := length(str) downto 1 do write(str[i]) ;

• In từng kí tự ra màn hình theo thứ tự ngược, trừ kí tự đầu tiên.

• In từng kí tự xâu ra màn hình.

• In từng kí tự ra màn hình theo thứ tự ngược

• In xâu ra màn hình.