Bạn cần đăng nhập để báo cáo vi phạm tài liệu

Nhập vào từ bàn phím một xâu. Kiểm tra xâu đó có phải là xâu đối xứng hay không

177

Top 1000 câu hỏi thường gặp môn Tin học có đáp án (phần 3) hay nhất được biên soạn và chọn lọc giúp bạn ôn luyện và đạt kết quả cao trong bài thi môn Tin học.

Nhập vào từ bàn phím một xâu. Kiểm tra xâu đó có phải là xâu đối xứng hay không

Câu 22: Nhập vào từ bàn phím một xâu. Kiểm tra xâu đó có phải là xâu đối xứng hay không. Xâu đối xứng có tính chất: đọc nó từ phải sang trái cũng thu được kết quả giống như đọc trái sang phải (còn được gọi xâu palindrome).

Lời giải:

program vd2;

uses crt;

var

          i,x:byte;

          a,p:string;

begin

          clrscr;

          write(‘nhapxau’);

          readln(a);

          x:=length(a);

          p:=’’;

          for i:=x downto 1 do

          p:=p+a[i];

          if a=p then

                   write(‘xau la palindrome’)

else

                   write(‘xau khong phai la palindrome’);

          readkey;

end.

Từ khóa :
Giải bài tập
Đánh giá

0

0 đánh giá