WorksheetsKIỂU XÂU_TIN11
Total questions: 20
Worksheet time: 17mins
Câu lệnh khai báo biến xâu nào đúng? (có thể nhiều đáp án)
Var a: string;
Var : a string;
var a, b: string[20];
var s = string;
Xâu kí tự có độ dài bằng 0 gọi là:
Không tồn tại
Xâu rỗng
Chứa kí tự 0
Xâu ngắn
Để khai báo biến xâu ta sử dụng tên dành riêng:
Array
String
Type
Const
Cho xâu S là “Ha Noi – Viet Nam” , kết quả của hàm Pos(‘Viet Nam’,S) là:
9
11
10
12
Cho s = ‘abc123456’ hàm Copy(s,2,4) cho giá trị bằng:
12
23
bc12
c123
Cho S1:='Bien dao que huong';
S2:= upcase(S1[10]);
S2 có giá trị là:
'Q'
'Bien Dao Que Huong'
'Que'
‘Bien’
Câu lệnh nào xóa kí tự cuối cùng của xâu a?
delete(a, length(a), 1);
delete(a, 1, 255);
delete(a, 255, 1);
delete(a, 1, length(a));
Cho 2 xâu A, B. Hãy cho biết câu lệnh sau thực hiện công việc gì:
If A[1] = B[length(B)] then writeln(‘Giong nhau’)
else writeln(‘Khac nhau’);
Xuất ra kết quả so sánh kí tự đầu tiên của xâu A và kí tự cuối cùng của xâu B.
Xuất ra kết quả so sánh của xâu A và xâu B.
Xuất ra kết quả so sánh chiều dài của xâu A và chiều dài của xâu B.
Xuất ra kết quả so sánh kí tự đầu tiên của xâu B và kí tự cuối cùng của xâu A.
Trong xâu, để in xâu S ra màn hình theo thứ tự ngược lại, phải thực hiện lệnh :
For i:=length(S) downto 1 do write(S[i]);
For i:=length(S) downto 1 do write(S);
For i:=1 to length(S) do write(S[i]);
For i:=1 to length(S) div 2 do write(S[i]);
Cho s := ‘500 ki tu’
hàm Length(s) cho giá trị bằng:
9
‘5’
500
‘500’
Cho sâu s1 = ‘123’; s2 = ‘abc’ sau khi thực hiện thủ tục Insert(s1,s2,2) thì:
s1 = ‘123’; s2 = ‘a123bc’
s1 = ‘123’; s2 = ‘12abc’
s1 = ‘1abc23’; s2 = ‘abc’
s1 = ‘ab123; s2 = ‘abc’
Cho khai báo sau:
Var hoten : string;
Phát biểu nào dưới đây là đúng?
Xâu có độ dài lớn nhất là 255;
Xâu có độ dài lớn nhất là 0;
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;
Cho s1 = ‘010’; s2 = ‘1001010’ hàm pos(s1,s2) cho giá trị bằng:
2
3
4
5
Trong các phát biểu sau, phát biểu nào sai?
Xâu A lớn hơn xâu B nếu độ dài xâu A lớn hơn độ dài xâu B;
Xâu A lớn hơn xâu B nếu kí tự dầu tiên khác nhau giữa chúng kể tử trái sang trong xâu A có mã ASCII lớn hơn;
Nếu A và B là các xâu có độ dài khác nhau và A là đoạn đầu của B thì A nhỏ hơn B;
Hai xâu bằng nhau nếu chúng giống nhau hoàn toàn;
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(s,’hoa’);
i:=pos(‘hoa’,’hoa’);
i:=pos(‘hoa’,s);
s1:=’hoa’ ; i:=pos(s1,’hoa’);
Xâu ‘ABBA’ lớn hơn xâu:
‘ABC’;
‘ABABA’;
‘ABCBA’;
‘BABA’;
Cho S là biến xâu, kết quả sau khi thực hiện các lệnh:
S:='ABCDEF';
DELETE(S,3,2);
INSERT('XYZ',S,2);
(a)
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 ;
Xóa đi các dấu cách trong xâu;
Đếm số ký tự có trong xâu;
Đếm số dấu cách có trong xâu;
Xóa đi các ký tự số;
Cho khai báo sau: Var hoten : String;
Phát biểu nào dưới đây là đúng ?
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
Xâu 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 đó
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 xâu ra màn hình;
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, trừ kí tự đầu tiên;
In từng kí tự ra màn hình theo thứ tự ngược;
