Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Huyền Trang

Viết chương trình đưa ra xâu S với các ký tự chữ cái trong xâu đã được chuyển thành chữ cái in hoa

Nguyễn Lê Phước Thịnh
16 tháng 3 2021 lúc 23:26

uses crt;

var s:string;

i,d:integer;

begin

clrscr;

write('Nhap xau S:'); readln(s);

d:=length(s);

for i:=1 to d do 

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

writeln(s);

readln;

end.


Các câu hỏi tương tự
Nguyen Ngoc Thien
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Thọ Phạm
Xem chi tiết
Huy Lê Đình
Xem chi tiết
Vân Hồng
Xem chi tiết
NGUYỄN VIẾT LUẬN
Xem chi tiết
NGUYỄN VIẾT LUẬN
Xem chi tiết
Minh Nguyễn
Xem chi tiết