Nhập 1 Xâu Kí Tự. Kiểm Tra Tính đối Xứng Của Xâu đó. Nếu Xâu Không ...

Có thể bạn quan tâm

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

- Đăng nhập
- |
- Đăng ký

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

logo

Lưu vào

+
Danh mục mới

Lưu

TiKiKhoi2003
Chưa có nhóm

Trả lời
1
Điểm
7
Cảm ơn
0

Tin Học
Lớp 11
10 điểm
TiKiKhoi2003 - 09:14:08 01/09/2019

Nhập 1 xâu kí tự. Kiểm tra tính đối xứng của xâu đó. Nếu xâu không đối xứng thì đảo xâu

Hỏi chi tiết
Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

lengockimtuyen
Chưa có nhóm

Trả lời
36
Điểm
836
Cảm ơn
22

lengockimtuyen

01/09/2019

I. Hướng dẫn giải BT kiểm tra xâu đối xứng trong pascal C++

1. Kiểm tra xâu đối xứng cách 1

– Cách đơn giản nhất là ta sẽ đọc ngược lại xâu S và lưu vào biến S1. sau đó kiểm tra 2 xâu có hoàn toàn giống nhau hay không?

ví dụ:

S=”abcde” => S1=”edcba”. 2 xâu này không giống nhau nên không là xâu đối xứng.

S=”aabccbaa” => S1=”aabccbaa”. 2 xâu này giống nhau hoàn toàn nên kết luận được là xâu đối xứng.

– Đây cũng là cách mà trong sách giáo khoa Tin học 11 chia sẻ

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy

Cảm ơn
Báo vi phạm

- Newbiecpp
- Chưa có nhóm
- Trả lời
  40
- Điểm
  135
- Cảm ơn
  14
#include <bits/stdc++.h> using namespace std; long long d[300],m=0; long long kq=0; string s; int main() { ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0); cin>>s; for(int i=0;i<=s.size()-1;i++) { d[s[i]]++; } ... xem thêm

Đăng nhập để hỏi chi tiết

Xem thêm:

>> Bài mẫu thư UPU lần thứ 54 năm 2025
>> Mời tham gia sự kiện "Nhìn lại năm cũ 2024"

thao53720
Chưa có nhóm

Trả lời
1
Điểm
75
Cảm ơn
0

thao53720

16/01/2020

var str,s:string[100];

n,i:integer;

procedure sx( var a,b:char);

var tam:char;

begin

tam:=a;

a:=b;

b:=tam;

end;

procedure dao(n,i:integer);

var j:integer;

begin

for j:=i+1 to n do

if str[i]=str[j] then

begin

sx(str[j],str[n-i+1]);

exit

end;

begin

clrscr;

write('nhap xau:');readln(str);

n:=length(str);

s:='';

for i:=n downto 1 do s:=s+str[i];

if str=s then writeln('chuoi doi xung:')

else

begin

writeln('chuoi ko doi xung,chuoi da dảo doi xung:');

for i:=1 to n-1 do

dao(n,i);

end;

write(str);

readln;

end.

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy

Cảm ơn
Báo vi phạm

- haidark
- Chưa có nhóm
- Trả lời
  0
- Điểm
  50
- Cảm ơn
  0
MÌnh làm như này bạn xem dc ko :)) program xaukt; uses crt; var s,s1:string; i:integer; begin clrscr; writeln('nhap vao 1 xau: '); readln(s); s1:=''; for i:=length(s) downto 1 do s1:=s1+s[i]; writeln('xau dx: ',s1); ... xem thêm
- Neverno2
- Chưa có nhóm
- Trả lời
  2
- Điểm
  70
- Cảm ơn
  2
ko :)))