Viết chương trình nhập vào một chuỗi ký tự . Sau đó in chuỗi ra màn hình với

Minh Đức

Đã trả lời bởi chuyên gia

· 12:00 07/08/2023

Đã trả lời bởi chuyên gia

Viết chương trình nhập vào một chuỗi ký tự . Sau đó in chuỗi ra màn hình với các ký tự đầu đổi thành chữ thường, các ký tự cuối của từ trong chuỗi sang chữ hoa.

Trả Lời

Lưu câu hỏi Lưu

Hỏi chi tiết

Quảng cáo

1 câu trả lời 117

Ngọc Anh

2 năm trước

Program CHUOI_CHU_THUONG;

Uses Crt;

Var i,l:integer;

st:string[50];

Begin

Clrscr;

Writeln('DOI CHUOI SANG CHUOI CHU THUONG');

Writeln('------------------------------------------------------');

Write('Nhap chuoi ky tu: '); Readln(st);

For i:=1 to length(st) do

If (st[i]>='A') and (st[i]<='Z') then

st[i]:= chr(ord(st[i])+32);

Writeln;

Writeln('Chuoi doi thanh chu thuong la : ');

Writeln(st);

Writeln; l:=length(st);

st[l]:=upcase(st[l]);

For i:=l downto 2 do

If st[i]=' ' then st[i-1]:=upcase(st[i-1]);

Writeln('Chuoi cac ky tu cuoi cua tu la ky tu hoa: ');

Writeln(st);

Readln;

End.

...Xem thêm

0 bình luận

Đăng nhập để hỏi chi tiết

Quảng cáo

Bạn hỏi - Chuyên gia trả lời

Bạn cần hỏi gì?

1 câu trả lời 117

Câu hỏi hot cùng chủ đề

Bài viết mới nhất Lớp 12