VCT In ra màn hình thông báo đây là xâu đối xứng

VCT In ra màn hình thông báo đây là xâu đối xứng

Viết chương trình nhập vào một xâu. In ra màn hình thông báo đây là xâu đối xứng, hoặc không phải là xâu đối xứng

Ôn tập Dấu chấm phẩy và lời chú thích

a. Dấu chấm phẩy

Dấu chấm phẩy ( ; )dùng để ngăn cách giữa các câu lệnh.

Sau một câu lệnh phải có dấu chấm phẩy.

Ví dụ: Write(‘Nhap so a:’); Readln(a);

b. Lời chú thích

Lời chú thích có thể đặt bất cứ vị trí nào trong chương trình, nhưng phải nằm trong cặp dấu { và } hoặc (* và *).

Ví dụ: {Day la loi chu thich}

(* Day cung la mot loi chu thich*).

Bài giải

Program Doi_xung;

Uses crt;

Var i,n: integer;

var str,s:string[100];

Begin

    Clrscr;

    Write('Nhap xau S: '); 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 writeln('Chuoi khong doi xung:');
    
    readln;

End.

Hình minh họa

Xau

Xau

Bạn thấy bài viết này như thế nào?: 
Average: 10 (1 vote)
Ảnh của Tommy Tran

Tommy owner Express Magazine

Drupal Developer having 9+ year experience, implementation and having strong knowledge of technical specifications, workflow development. Ability to perform effectively and efficiently in team and individually. Always enthusiastic and interseted to study new technologies

  • Skype ID: tthanhthuy

Bình luận (0)

 

Add Comment

Filtered HTML

  • Các địa chỉ web và email sẽ tự động được chuyển sang dạng liên kết.
  • Các thẻ HTML được chấp nhận: <a> <em> <strong> <cite> <blockquote> <code> <ul> <ol> <li> <dl> <dt> <dd>
  • Tự động ngắt dòng và đoạn văn.

Plain text

  • No HTML tags allowed.
  • Các địa chỉ web và email sẽ tự động được chuyển sang dạng liên kết.
  • Tự động ngắt dòng và đoạn văn.
CAPTCHA
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.
Image CAPTCHA
Enter the characters shown in the image.

Advertisement

 

jobsora

Dich vu khu trung tphcm

Dich vu diet chuot tphcm

Dich vu diet con trung

Quảng Cáo Bài Viết

 
Window, Window 7, Mac iOS 6, Mac OS, MacBook Air, MacBook Pro

Hướng dẫn thiết lập mạng riêng ảo (VPN) của riêng bạn trên Windows và Mac

Mạng riêng ảo (hay Virtual Private Network) là một mạng thường dành riêng để kết nối các máy tính trong nhà hay trong một tổ chức với nhau thông qua Internet

Phát hiện lỗ hổng bảo mật trên Galaxy S4 và Galaxy Note 3

Phát hiện lỗ hổng bảo mật trên Galaxy S4 và Galaxy Note 3

Một điều khá trớ trêu đó là lỗ hổng bảo mật của Samsung lại nằm trong ứng dụng bảo mật cao cấp Knox, được Samsung trang bị cho nhiều sản phẩm của hãng

"Đổ thùng rác" tự động bằng AppleScript cho Mac

"Đổ thùng rác" tự động bằng AppleScript cho Mac

Thủ thuật này chỉ có hiệu nghiệm khi bạn áp dụng đoạn code, không phải là mọi lúc đều tự động xóa sạch nội dung Trash.

Công ty diệt chuột T&C

 

Diet con trung