Viết chương trình nhập vào 1 xâu: Chuẩn hóa xâu thành in hoa

Question

dananhnhu · Answer

program xau_in_hoa;

uses crt;

var s:string;

i:byte;

begin

clrscr;

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

for i:=1 to length(s) do

s[i]:=upcase(s[i]);

write(‘Xau hoa la: ‘,s);

readln;

end.

dantam · Answer

program in_hoa;

uses crt;

var s: string;

i: byte;

Begin

clrscr;

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

for i:=1 to length(s) do s[i]:=upcase(s[i]);

write(‘Xau in hoa: ‘,s);

readln

End.

0 bình luận về “Viết chương trình nhập vào 1 xâu: Chuẩn hóa xâu thành in hoa”