Hãy viết chương trình: Chuyển chuỗi nhập từ bàn phím thành 1 chuỗi toàn là chữ viết hoa Nhập chuỗi abCD Kết quả: ABCD

2 câu trả lời

program oken;

uses crt;

var str:string;

begin

write('nhap 1 chuoi: '); readln(str);

str:=upcase(str);

writeln('chuoi sau khi viet hoa: ',str);

readln;

end.

Program BTH;
uses crt;
var xau:string;
Begin
        clrscr;
        write('Nhap chuoi: ');readln(xau);
        xau:=upcase(xau);
        writeln('Chuoi sau khi viet hoa la: ',xau);
        readln;
end.

Câu hỏi trong lớp Xem thêm