Hãy chuyển xâu S =’toi la hoc sinh lop 11A5′ thành xâu gồm các kí tự là chữ in hoa

Hãy chuyển xâu S =’toi la hoc sinh lop 11A5′ thành xâu gồm các kí tự là chữ in hoa

0 bình luận về “Hãy chuyển xâu S =’toi la hoc sinh lop 11A5′ thành xâu gồm các kí tự là chữ in hoa”

  1. program chuyenxau;

    uses crt;

    var s:string;

          i:byte;

    begin

    clrscr;

    write(‘Nhap xau: ‘);   readln(s);

    for i:=1 to length(s) do

     if s[i] in [‘A’..’Z’] then s[i]:=upcase(s[i]);

    write(‘Xau sau khi chuyen la: ‘,s);

    readln

    end.

    Bình luận
  2. uses crt;
    var i:byte;
        s:string;
    BEGIN
            clrscr;
            write(‘Nhap xau:’); readln(s);
            write(‘Xau sau khi chuyen la:’);
            for i:=1 to length(s) do write(upcase(s[i]));
            readln
    END.

    Chúc bạn học tốt.

    Cho mình xin câu trả lời hay nhất.

    Bình luận

Viết một bình luận