Xâu đối xứng là xâu đọc từ trái sang phải cũng thu được kết quả giống như đọc từ phải sang traùi Trả lời:... Xâu đối xứng có tính chất?[r]
(1)Gi¸o ¸n ®iÖn tö tin häc líp 11 (2) Caâu hoûi kieåm tra baøi cuõ: - Em haõy neâu khaùi nieäm xaâu? - Cho ví dụ xâu đối xứng? (Xâu đối xứng là xâu đọc từ trái sang phải thu kết giống đọc từ phải sang traùi) Trả lời: Xâu là dãy các kí tự mã ASCII Ví dụ: S:= ‘I was saw I’ (3) Giaûi Thích: I was saw I I 10 w a s 10 s a w w a s I 11 s a w 11 I I Xâu đối xứng có tính chất ? Đọc nó từ trái sang phải thu kết giống đọc từ phải sang trái (còn gọi là xâu Palindrome) (4) BAØI TẬP VAØ THỰC HAØNH Bài : Nhập từ bàn phím xâu Kiểm tra xâu đó có phải là xâu đối xứng hay không ? Input: Nhập vào xâu Output: Xuất kết có phải là xâu đối xứng (5) BAØI TẬP VAØ THỰC HAØNH THUẬT TOÁN Bước 1: Nhập Xâu S Bước 2: Tính chiều dài xâu S Bước 3: Tạo xâu P (xâu rỗng) Bước 4: Với I = length(S) thì P:=P+S[i] Bước 5: Nếu S=P thì S là xâu đối xứng, ngược lại thì không phải là xâu đối xứng (6) THUẬT TOÁN Bước 1: Nhập Xâu S Bước 2: Tính chiều dài xâu S Bước 3: Tạo xâu P (xâu rỗng) Bước 4: Với I =length(S) thì P:=P+S[i] Bước 5: Nếu S=P thì xâu là Palindrome, ngược lại Xâu không là Palindrome CHƯƠNG TRÌNH VAR i, x: byte; S, P: string; BEGIN Write(‘Nhap vao xau S:’); Readln(S); x:= length(s); P:= ’’; For i:=x downto P:= P+S[i]; If S=P then write(‘Xau la Palindrome’) Else write(‘Xau khong la Palindrome’); readln; END (7)