doan nguyenhanh
Hỏi từ APP VIETJACK
Vct nhập vào xâu kí tự đưa ra xâu với với chữ cái hoa đầu mỗi chữ và mỗi chữ 1 hàng
Vct nhập vào xâu kí tự có nhiều kí tự trống đưa ra mỗi chữ cách nhau 1 kí tự trống
Vct nhập vào xâu kí tự đưa ra xâu đảo vị trí các chữ
Vct nhập vào xâu kí tự có nhiều kí tự trống đưa ra mỗi chữ cách nhau 1 kí tự trống
Vct nhập vào xâu kí tự đưa ra xâu đảo vị trí các chữ
Quảng cáo
1 câu trả lời 151
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.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
86376
Gửi báo cáo thành công!
