OPTADS360
NONE
YOMEDIA
Banner-Video
IN_IMAGE

Viết một chương trình: nhập 1 xâu ký tự bất kỳ và thực hiện xử lý xâu vừa nhập với các yêu cầu dưới đây

a. Hiển thị xâu vừa nhập cùng với độ dài của xâu đó?

b. Xóa các ký tự trắng dư thừa có trong xâu? (Mỗi từ chỉ cách nhau 1 ký tự trống, ở đầu và cuối xâu không chứa ký tự trống)

c. Biến đổi xâu thành xâu in hoa?

d. Biến đổi xâu thành xâu in thường?

  bởi An Vũ 18/11/2021
ADMICRO/lession_isads=0

Câu trả lời (1)

  • Program hotrotinhoc;

    var st,s: string;

    i,n: integer;

    begin

    write('Nhap xau : '); readln(st);

    writeln('Xau vua nhap la : ',st);

     s:=st;

    writeln('Do dai cua xau la : ',length(st));

    while st[1]=#32 do delete(st,1,1);

    while st[length(st)]=#32 do delete(st,length(st),1);

    while pos(#32#32,st)<>0 do delete(st,pos(#32#32,st),1);

    writeln('Xau sau khi xoa cac ky tu trang : ',st);

    s:=upcase(s);

    writeln('Xau sau khi bien doi thanh xau in hoa : ',s);

    s:=lowercase(s);

    write('Xau sau khi bien doi thanh xau in thuong : ',s);

    readln

    end.

      bởi Nguyễn Thanh Thảo 19/11/2021
    Like (0) Báo cáo sai phạm

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
 

Các câu hỏi mới

NONE
OFF