bài giảng kiểu xâu tiết 2

CÁC HÀM VÀ THỦ TỤC XỬ LÝ XÂU:... KIỂM TRA BÀI CŨĐẶT VẤN ĐỀ NỘI DUNG BÀI MỚI • Thủ tục: Delete • Thủ tục: Insert • Hàm Copy • Hàm Length • Hàm Pos • Hàm UpCase Viết chương trình nhập vào

Trang 1

CHƯƠNG IV

( Tiết 2 )

Trang 2

KIỂM TRA BÀI CŨ

ĐẶT VẤN ĐỀ

NỘI DUNG BÀI MỚI

• Thủ tục: Delete

• Thủ tục: Insert

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

A B C D

Var A: string[50];

Var A= string[30];

Var A: string;

Var A: string[1];

Câu 1: Cách khai báo biến xâu

nào dưới đây là sai?

Trang 3

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

1 2 3 1 2 3

ST1[1] ST1[2] ST1[3] = ST2[1] ST2[2] ST2[3]

ST2

<

Câu 2: So sánh 2 xâu sau:

ST1:= ‘CBA’

ST2:= ‘CBa’

ST1

Trang 4

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Cần có thao tác

gì để chỉnh sửa xâu A thành xâu

B ?

A n

e y

u g

n

1 2 3 4 5 6 7 8 9

N

1 2 3 4 5 6 7 8 9 10

Trang 5

CỦNG CỐ

• Thủ tục: Delete

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

1 Thủ tục DELETE(St, vt, n)

• Xoá n kí tự của xâu St bắt đầu từ vị trí vt

Ví dụ 1:

St:= ‘Song Hong’;

Delete(St,1,5);

g n

o H

g n

o S

1 2 3 4 5 6 7 8 9

ST[1]

g n

o H

Kết quả: St = ‘Hong’

C CÁC HÀM VÀ THỦ TỤC XỬ LÝ XÂU:

Trang 6

• Thủ tục: Delete

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Ví dụ 2:

St:= ‘abc’ Delete(St,1,5) St =‘ abc’

Ví dụ 3:

St:= ‘abc’ Delete(St,5,2) St = ‘abc’

Ví dụ 4:

St:= ‘abc’ Delete(St,1,0) St = ‘abc’

Trang 7

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

2 Thủ tục INSERT(St1, St2, vt)

Ví dụ 1:

St1:= ‘vi-’; St2:= ‘May-tinh’;

v i

1 2 3

M a y - t i n h

1 2 3 4 5 6 7 8

v i

-Kết quả: St2 = ‘May-vi-tinh’

1 2 3 4 5 6 7 8 9 10 11

Chèn xâu St1 vào xâu St2 bắt đầu từ vị trí vt

Insert(St1,St2,5);

Trang 8

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Ví dụ 2:

St1:= ’abc’ abc Insert(St1,St2,5) St2 = ’ef’ ef

St2 =‘ ’

Trang 9

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

3 Hàm COPY(S, vt, n)

• Tạo một xâu gồm n ký tự liên tiếp bắt đầu

từ vị trí vt của xâu S

Ví dụ 1:

St1:= ‘Xau-ky-tu’; St2:= Copy(St1,5,5);

1 2 3 4 5 6 7 8 9

Copy

Kết quả St 2 = ‘ky-tu’

Trang 10

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

S:= ‘abc’

Ví dụ 2:

S1:= copy(S,1,5);

S1 =

‘abc’

S:= ‘abc’ S1:= copy(S,5,2); S1 = ‘’

Trang 11

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

4 Hàm LENGTH(S)

Ví dụ :

S:= ‘Tin hoc’;

D:= Length(S);

Kết quả: D = 7 quả

Cho giá trị là độ dài của xâu S

Trang 12

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

5 Hàm POS(St1, St2)

- Cho vị trí xuất hiện đầu tiên của xâu St1 trong xâu St2

Ví dụ 1:

St2:= ‘HOA NANG’; St1:= ‘NANG’;

D:= Pos(St1,St2);

Trang 13

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Ví dụ 2:

S2:= ‘abcde’

D:= pos(‘Cd’,S2);

D = 0

Cd Cd CdCd Cd

Trang 14

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

• Cho chữ cái in hoa ứng với chữ cái trong ch

6 Hàm UPCASE(Ch)

Ch2:= Upcase(Ch1);

1 2 3 4 5 6

Upcase(st[1]) Upcase(st[2]) Upcase(st[3]) Upcase(st[4]) Upcase(st[5]) Upcase(st[6])

1 2 3 4 5 6

Kết quả: Ch2 = ‘A’

Ch1:= ‘a’;

St

Trang 15

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Copy(S, vt, n) Insert(S1, S2, vt) Delete(St, vt, n)

Pos(S1, S2)

Length(S)

Upcase(ch)

Các hàm và thủ tục xử lý xâu:

Trang 16

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

Viết chương trình nhập vào một xâu S,

in ra màn hình xâu đó ở dạng in hoa.

Bài tập

Trang 17

CỦNG CỐ

• Hàm Copy

• Hàm Length

• Hàm Pos

• Hàm UpCase

CHƯƠNG TRÌNH:

Program inhoa;

Uses CRT;

Var S: string; i: integer;

Begin

Clrscr;

Write(‘Nhap vao xau S: ’); readln(S);

For i:= 1 To length(S) Do upcase(S[i]);

Write(‘Xau da chuyen:’,S);

Readln;

End.

Tiêu đề	Bài Giảng Kiểu Xâu Tiết 2
Trường học	Trường Đại Học Công Nghệ Thông Tin
Chuyên ngành	Công Nghệ Thông Tin
Thể loại	Bài Giảng
Thành phố	Hồ Chí Minh

Định dạng
Số trang	18
Dung lượng	1,88 MB