Mô phỏng thủ tục xâu

Thủ tục Delete(st,vt,n);
Xoá n kí tự của xâu St bắt đầu từ vị trí vt
St =’tin hoc’
Thủ tục Insert(S,St,vt);
Chèn xâu S vào xâu St bắt đầu từ vị trí vt.
S = ’Abc’
St =
St =’tin
Delete(St,4,3);
Ví dụ:
ho
c’
Ví dụ:
St = ’def’
Insert(S,St,1);
Abc
def
‘
’
Mô phỏng các thủ tục hàm chuẩn
Hàm Copy(S,vt,n)
Tạo xâu gồm n kí tự liên tiếp bắt đầu từ vị trí vt của xâu S
S = ’ hoa hong’
Hàm Length(S)
Cho giá trị là độ dài của xâu S.
S = ’ab 2’
M =
S1 = ’ ’
S1 = copy(s,5,4);
Ví dụ:
hong
Ví dụ:
1
2
3
4
Length(S)
Mô phỏng các thủ tục ,hàm chuẩn
Hàm Pos (S1,S2)
Cho vị trí xuất hiên đầu tiên của xâu S1 trong xâu S2.
S2=’abcde’
Hàm Upcase(ch)
Cho chữ viết hoa ứng với chữ cái trong ch.
Ví dụ: ch = upcase(‘d’);
Ch = ’D’
M1 = 0

Chú ý: ch phải là một phần tử của xâu hay là một kí tự
Ví dụ:
M1=pos(‘Cd’,S2);
Cd
1
2
3
4
5
Cd
Cd
Cd
Cd
S2=’abCde’
M2 =
M2=pos(‘Cd’,S2);
Cd
1
2
3
Cd
Cd
Mô phỏng các thủ tục , hàm chuẩn