Bài 12: Kiểu xâu
Các câu hỏi tương tự
1) Cho doan chuong trinh sau:
s1:= '1234' s2:='abc'
If length(s1) < length(s2) then writeln(s1) else writeln(s2);
Ket qua in ra man hinh la:
A. '1234' B. 'abc' C. '1234abc' D. 'abc1234'
1) Cho doan chuong trinh sau:
s:= 'abcde'
write(pos('cba',s));
Ket qua in ra man hinh la:
A. 0 B.'0' C.3 D.'3'
1) Cho doan chuong trinh sau:
s:= '123456'
For i:= length(s) downto 1 do write(s[i]);
Ket qua in ra man hinh la:
A.'123456' B. '12345' C.'54321' D. '654321'
1) Cho doan chuong trinh sau:
s:= 'Mua xuan'
write(upcase(s[length(s)-2]));
Ket qua in ra man hinh la:
A. 'X' B.'U' C.'A' D. 'N'
1) Cho doan chuong trinh sau:
s:= 'ABCDEF'
delete(s,3,2);
insert('XYZ',s,1);
write(s);
Ket qua in ra man hinh la:
A. 'ABXYZEF' B. 'ABEXYZF' C. 'AXYZ' D. 'AXYZBEF'
1) Viet chuong trinh nhap xau S1, tao xau S2 gom tat ca cac chu so cua xau S1
Cho đoạn chương trình sau: s1:='abcd' s2:='acb'
if length(s1)>length(s2) then write(s2) else write(s1);
Đoạn chương trình trên đưa ra màn hình kết quả nào sau đây:
A. Abcdacb B. Acb C. Abcd D. Acbabcd
1) Viet chuong trinh nhap xau S1, tao xau S2 bao gom tat ca cac ki tu da xoa het chu so trong xau S1
điền vào chỗ trống (....) trong bang sau;
giá trị s1 giá trị s2 thao tác kết quả.
'cua me' 'em la mua xuan cua me' Insert(.....,s2,....) 'em la mua xuan cua me'
'tong so 123 em' Pos('123',s1)......
'tong so 123 em' Copy(s1.....,......); '123'
Nhanh nha.
Thanks