Follow us on...
Follow us on Twitter Follow us on Facebook Watch us on YouTube

Tuyển chuyên viên tin tức VN-Zoom 2014

Tìm HD - Phần mềm tìm và xem phim HD miễn phí

Hoãn tổ chức offline VN-Zoom 8 năm tại TP HCM

Chiêm ngưỡng BaoMoi đẹp "tuyệt diệu" trên Windows Phone

Tài trợ VNZ Siêu phẩm Tân Kiếm Thế chibi 3D mới

Tuyển BQT VN-Zoom
kết quả từ 1 tới 5 trên 5
  1. #1
    kutelegend's Avatar
    kutelegend vẫn chưa có mặt trong diễn đàn Búa Gỗ
    Tham gia
    Jan 2010
    Bài
    13
    Cảm ơn
    1
    Điểm
    0/0 bài viết
    VR power
    0

    Default bài tập pascal về xâu kí tự

    Viết chương trình hợp ngữ nhập vào một xâu kí tự. Hãy in ra màn hình xâu
    đó theo thứ tự ngược lại. Ví dụ: xâu đầu vào: “abc” thì in ra''cba''

  2. #2
    19-6's Avatar
    19-6 vẫn chưa có mặt trong diễn đàn Moderator
    Tham gia
    Sep 2008
    Đến từ
    Abyss
    Bài
    1.904
    Cảm ơn
    858
    Điểm
    3.407/1.516 bài viết
    VR power
    0

    Default

    Code:
    uses crt;
    var s1,s2: string;
        i: integer;
    
    BEGIN
     clrscr;
     write('Nhap 1 xau: ');readln(s1);
     for i:=length(s1) downto 1 do
      s2:=s2+s1[i];
     write('Xau dao nguoc: ',s2);
     readln;
    END.
    Thay đổi nội dung bởi 19-6; 26-02-2011 lúc 12:29.


  3. #3
    kutelegend's Avatar
    kutelegend vẫn chưa có mặt trong diễn đàn Búa Gỗ
    Tham gia
    Jan 2010
    Bài
    13
    Cảm ơn
    1
    Điểm
    0/0 bài viết
    VR power
    0

    Default

    thanks nha pạ lam chjnk xax

  4. #4
    fireblood's Avatar
    fireblood vẫn chưa có mặt trong diễn đàn Búa Đá
    Tham gia
    Jun 2010
    Bài
    71
    Cảm ơn
    6
    Điểm
    8/6 bài viết
    VR power
    0

    Default

    Phải thêm biến s2 vào làm chi? Làm thế này bớt đc 1 biến nè
    uses crt;
    var st: string;
    i: integer;
    BEGIN
    clrscr;
    write('Nhap 1 xau: ');readln(st);
    writeln;
    for i:=length(st) downto 1 do
    write(st[i]);
    readln;
    END.
    cho hỏi làm cái khung như bác 19-6 kiểu gì thế

  5. Có 1 thành viên cảm ơn fireblood cho bài viết này:
    19-6 (23-12-2011)

  6. #5
    19-6's Avatar
    19-6 vẫn chưa có mặt trong diễn đàn Moderator
    Tham gia
    Sep 2008
    Đến từ
    Abyss
    Bài
    1.904
    Cảm ơn
    858
    Điểm
    3.407/1.516 bài viết
    VR power
    0

    Default

    Trích fireblood View Post
    Phải thêm biến s2 vào làm chi? Làm thế này bớt đc 1 biến nè

    cho hỏi làm cái khung như bác 19-6 kiểu gì thế
    Uh, đúng rồi, không hiểu tại sao hồi đó lại làm như thế

    cách bỏ vào khung code



 

 

Quyền sử dụng

  • Bạn không thể gửi chủ đề mới
  • Bạn không thể gửi trả lời
  • Bạn không thể gửi file đính kèm
  • Bạn không thể tự sửa bài viết của mình
  •