KiỂM TRA BÀI CŨ Câu 1 : Em hãy nêu các cách khai báo của mảng 2 chiều : a. Khai báo trực tiếp của mảng 2 chiều. b. Khai báo gián tiếp của mảng 2 chiều. Câu 2 : Cho ví cách khai báo gián tiếp của mảng 2 chiều? TRẢ LỜI Câu 1 : Các cách khai báo : a. Khai báo trực tiếp: Var <tên biến mảng>:array[kiểu chỉ số hàng,kiểu chỉ số cột]of <kiểu phần tử> Câu 1 : Các cách khai báo : b. Khai báo gian tiếp : Type<tên kiểu mảng>=array[kiểu chỉ số hàng, kiểu chỉ số cột] of <kiểu phần tử>; Var <tên biến mảng>:<tên kiểu mảng>; Gi¸o ¸n ®iÖn tö tin häc líp 11 Nhập vào họ tên của hai học sinh, in ra màn hình họ tên dài hơn? H H n n a a N N A A H H P P m m y y N N e e y y u u G G N N A B Hãy xác định kiểu dữ liệu của hai biến A,B? Bài toán đặt vấn đề: Xâu là dãy các kí tự trong bộ mã ASCII. T T I I n n H H o o c c A 1 2 3 4 5 6 7 Trong đó: Khi tham chiếu đến kí tự thứ i của xâu ta viết: A[i]. Tên xâu: A; Mỗi kí tự gọi là một phần tử của xâu; Ví dụ: Độ dài của xâu (số kí tự trong xâu): 7; H H 1. Khái niệm Ví dụ: A[5]= H . Xâu A có bao nhiêu phần tử? A[7]=C . c c 2. Khai báo kiểu dữ liệu xâu (trong Pascal) Var <tên biến> : String[độ dài lớn nhất của xâu]; Ví dụ: Var hoten: String[26]; Khi khai báo xâu có thể bỏ qua phần khai báo [độ dài lớn nhất], khi đó độ dài lớn nhất của xâu sẽ nhận giá trị ngầm định là 255. Ví dụ: Var chuthich :String; Hãy cho ví dụ về khai báo biến xâu? 3. Các thao tác xử lí xâu a. Biểu thức xâu: Ví dụ: Ha + Noi * Phép ghép xâu: * Phép so sánh: * Quy ước: - Xâu A = B nếu chúng giống hệt nhau. - Xâu A > B nếu: + Kí tự đầu tiên khác nhau giữa chúng ở xâu A có mã ASCII lớn hơn ở xâu B. + Xâu B là đoạn đầu của xâu A. - Xâu rỗng là xâu Tin hoc = Tin hoc Ví dụ Xau Xau ki tu Ha Noi Ha N am Là biểu thức trong đó các toán hạng là các biến xâu, biến kí tự. kí hiệu + dùng để ghép nhiều xâu thành một xâu =,<>, <,<=,>,>= SonHaSon + Ha Ha Noi Thế nào là xâu rỗng? Độ dài của xâu rỗng là bao nhiêu? Xâu có phải là xâu rỗng không? Vì sao? > < b. Các thủ tục và hàm chuẩn xử lí xâu S1= S1= 1 1 S2= S2= Hinh .2 Hinh .2 Insert(S1,S2,6) Insert(S1,S2,6) Chèn xâu Chèn xâu S1 S1 vào xâu vào xâu S2 S2 bắt đầu từ vị trí bắt đầu từ vị trí vt vt . . 2. 2. Insert Insert (S1,S2,vt) (S1,S2,vt) S = Song Hong S = Song Hong Delete(S,1,5) Delete(S,1,5) Xoá Xoá n n kí tự của xâu kí tự của xâu S S bắt đầu từ vị trí bắt đầu từ vị trí vt vt . . 1. 1. Delete Delete (S,vt,n) (S,vt,n) Ví dụ Ví dụ ý nghĩa ý nghĩa Thủ tục Thủ tục Hong Hinh 1.2 Ch= a Ch= a UPCase(Ch) = UPCase(Ch) = Chuyển kí tự Chuyển kí tự ch ch thành thành chữ hoa chữ hoa 4. 4. UPCase UPCase (ch) (ch) S1= 1 S2= Hinh S1= 1 S2= Hinh 1.2 1.2 Pos(S1,S2) = Pos(S1,S2) = Cho vị trí xuất hiện đầu Cho vị trí xuất hiện đầu tiên của xâu tiên của xâu S1 S1 trong trong xâu xâu S2 S2 3. 3. Pos Pos (S1,S2) (S1,S2) S = Xin chao S = Xin chao Length(S) = Length(S) = Cho giá trị là độ dài Cho giá trị là độ dài của xâu của xâu S S 2. 2. Length Length (S) (S) Ví dụ Ví dụ ý nghĩa ý nghĩa Hàm Hàm S = Tin hoc S = Tin hoc Copy(S,5,3)= Copy(S,5,3)= Tạo xâu gồm Tạo xâu gồm n n kí tự liên kí tự liên tiếp bắt đầu từ vị trí tiếp bắt đầu từ vị trí vt vt của xâu của xâu S S 1. 1. Copy Copy (S,vt,n) (S,vt,n) hoc 8 6 A [...]... Các bước: 1 Khai báo xâu : A,B 2 Nhập xâu Dựa vào các bư ớc bên, hãy hoàn thiện chư ơng trình? 3 Xử lí xâu, trong đ : Kí tự đầu tiên của xâu A: A[1] Kí tự cuối cùng của xâu B: B[x] trong đó X là độ dài của xâu B Viết chương trình 3 Nhập vào một xâu từ bàn phím, đưa ra màn hình xâu thu được bằng cách loại bỏ các dấu cách từ xâu đã cho? Ví d : - Xâu ban đầu : Mon Tin hoc - Kết quả ra màn hình : MonTinhoc... Khởi tạo xâu rỗng; B2 Lần lượt duyệt qua tất cả các phần tử của xâu vừa nhập, nếu phần tử được duyệt khác dấu cách thì bổ sung vào xâu rỗng Ví dụ S=Xin chao cac ban! Hãy Xâu là dãy các kí tự trong bộ nhớ! mã ASCII Khai báo: Var S : string[30] S[1] = X S[5]=c Var :String[độ dài lớn nhất của xâu] Tham chiếu phần tử của xâu: Tên xâu[ chỉ số] Các thao tác xử lí thường dùng: + Phép ghép xâu, so... bước: Thể hiện bằng pascal Program Vidu1; Uses Crt; 1 Khai báo xâu Var a,b: string; Begin Clrscr; 2 Nhập xâu Write( Nhap ho ten nguoi thu nhat :) ; Readln(a); Write(Nhap ho ten nguoi thu hai :) ; Readln(b); 3 Xử lí xâu IF Length(a)>Length(b) Then write(a) else write(b); Readln; End Chạy CT 2 Nhập vào hai xâu từ bàn phím, kiểm tra xem kí tự đầu tiên của xâu thứ nhất có trùng với kí tự cuối cùng của xâu. .. số] Các thao tác xử lí thường dùng: + Phép ghép xâu, so sánh xâu; + Các thủ tục và hàm chuẩn b Các thủ tục và hàm chuẩn xử lí xâu Cho xâu S=May tinh cua toi Tìm phương án đúng trong các phương án sau? A Copy(S,1,8)= Maytinh B Copy(S,1,8)= May tinh C Copy(S,1,8)= May tinh D Copy(S,1,8)= May tinh b Các thủ tục và hàm chuẩn xử lí xâu Cho xâu S=May tinh cua toi Tìm phương án đúng trong các phương an... toi Tìm phương án đúng trong các phương an sau? A Copy(S,1,8)= Maytinh B Copy(S,1,8)= May tinh C Copy(S,1,8)= May tinh D Copy(S,1,8)= May tinh Hoan hô bạn giỏi quá! b Các thủ tục và hàm chuẩn xử lí xâu Cho xâu S=May tinh cua toi Tìm phương án đúng trong các phương an sau? A Copy(S,1,8)= Maytinh B Copy(S,1,8)= May tinh C Copy(S,1,8)= May tinh D Copy(S,1,8)= May tinh Rất tiếc Xin mời bạn chọn lại! . i của xâu ta viết: A[i]. Tên xâu: A; Mỗi kí tự gọi là một phần tử của xâu; Ví d : Độ dài của xâu (số kí tự trong xâu ): 7; H H 1. Khái niệm Ví d : A[5]=. chuthich :String; Hãy cho ví dụ về khai báo biến xâu? 3. Các thao tác xử lí xâu a. Biểu thức xâu: Ví d : Ha + Noi * Phép ghép xâu: * Phép so sánh: * Quy