Viết Chương Trình Nhập Một Xâu Bất Kì Từ Bàn Phím A) Xóa Bỏ Kí Tự ...

logologoTì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
    • icon_userĐăng nhập
    • |
    • Đăng ký
    icon_menu
avataricon

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ý
  • add
  • Đặt câu hỏiiconadd
  • logo

    loading

    +

    Lưu vào

    • +

      Danh mục mới

    Lưuavataravatar
    • quocnguyen2kklllogoRank
    • Chưa có nhóm
    • Trả lời

      0

    • Điểm

      20

    • Cảm ơn

      0

    • Tin Học
    • Lớp 11
    • 40 điểm
    • quocnguyen2kkll - 13:33:37 10/04/2020
    Viết chương trình nhập một xâu bất kì từ bàn phím a) Xóa bỏ kí tự trắng thừa ở đầu, giữa, cuối xâu (nếu có) b) Đếm xem xâu sau khi xóa kí tự trắng thừa thì có bao nhiêu từ c) In ra màn hình từ đầu tiên và từ cuối cùng trong xâu trên (đã xóa kí tự trắng thừa)
    • Hỏi chi tiết
    • reportBá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

    avataravatar
    • vandat13012006logoRank
    • PHOENIX RISING
    • Trả lời

      6067

    • Điểm

      10370

    • Cảm ơn

      5311

    • vandat13012006
    • 13/08/2020

    Đây là câu trả lời đã được xác thực

    Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

    icon

    program vandat;uses crt;var st : string;i : integer;begin clrscr;write('Nhap xau ki tu :'); readln(st);for i:=1 to length(st) do if st[i]=#32 then delete(st,i,1);writeln('Xau khi da xoa ki tu trang :',st);writeln('Xau co ',length(st),' ki tu');writeln('Ki tu dau tien cua xau :',st[1]);writeln('Ki tu cuoi cua xau :', st[length(st)]);readlnend.

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

    starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy
    • hertCảm ơn
    Đăng nhập để hỏi chi tiếtavataravatar
    • thaitunamdzetlogoRank
    • Chưa có nhóm
    • Trả lời

      22

    • Điểm

      332

    • Cảm ơn

      13

    • thaitunamdzet
    • 10/04/2020

    uses crt;

    var i:integer;

    s,s2:string;

    begin

    clrsscr;

    writeln('Nhap xau:');

    readln(s);

    s2:='';

    for i:= 1 to length(s) do if ord(s[i]) <> 32 then s2:=s2+s[i];

    writeln('Xau sau khi xoa het cac ki tu trang thua : ');

    writeln(s2);

    writeln('Do dai cua xau sau khi xoa het cac ki tu trang thua la: ',length(s2));

    writeln('Tu dau tien cua xau tren la: ',s2[1]);

    writeln('Tu cuoi cung cua xau tren la: ',s2[length(s2)]);

    readln;

    end.

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

    starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar2.3starstarstarstarstar3 voteGửiHủy
    • hertCảm ơn
    • reportBáo vi phạm
    • avataravatar
      • lenhan22logoRank
      • Chưa có nhóm
      • Trả lời

        9

      • Điểm

        250

      • Cảm ơn

        5

      Cho mình hỏi 32 đó có ý nghĩa là gì?

    Đăng nhập để hỏi chi tiếtXEM LỜI GIẢI SGK TIN 11 - TẠI ĐÂY

    Bạn muốn hỏi điều gì?

    questionĐặt câu hỏi

    Tham Gia Group Dành Cho Lớp 11 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

    Bảng tin

    Bạn muốn hỏi điều gì?

    iconĐặt câu hỏi

    Lý do báo cáo vi phạm?

    Gửi yêu cầu Hủy

    logo

    Cơ quan chủ quản: Công ty Cổ phần Công nghệ Giáo dục Thành Phát

    • social
    • social
    • social

    Tải ứng dụng

    google playapp store
    • Hướng dẫn sử dụng
    • Điều khoản sử dụng
    • Nội quy hoidap247
    • Góp ý
    • Tin tức
    • mailInbox: m.me/hoidap247online
    • placeTrụ sở: Tầng 7, Tòa Intracom, số 82 Dịch Vọng Hậu, Cầu Giấy, Hà Nội.
    Giấy phép thiết lập mạng xã hội trên mạng số 331/GP-BTTTT do Bộ Thông tin và Truyền thông.

    Từ khóa » Xóa Các Ký Tự Trắng Dư Thừa Trong Xâu Pascal