Viết chương trình nhập họ và tên của một người và thực hiện các yêu cầu sau:
a. Xóa các kí tự trắng thừa trong xâu (kí tự trắng thừa là kí tự trắng ở đầu, cuối họ tên và nhiều hơn một kí tự trắng giữa hai từ trong họ tên)
b. Đổi các chữ cái đầu từ trong họ tên thành chữ in hoa
c. Hãy cho biết từ dài nhất trong họ và tên của người đó, nếu có nhiều từ có độ dài bằng nhau thì in ra từ đầu tiên.
d. Cho biết tên được tạo nên từ bao nhiêu chữ cái Tiếng Anh (không phân biệt chữ hoa chữ thường)
Viết chương trình nhập họ và tên của một người và thực hiện các yêu cầu sau:
a. Xóa các kí tự trắng thừa trong xâu (kí tự trắng thừa là kí tự trắng ở đầu, cuối họ tên và nhiều hơn một kí tự trắng giữa hai từ trong họ tên)
b. Đổi các chữ cái đầu từ trong họ tên thành chữ in hoa
c. Hãy cho biết từ dài nhất trong họ và tên của người đó, nếu có nhiều từ có độ dài bằng nhau thì in ra từ đầu tiên.
d. Cho biết tên được tạo nên từ bao nhiêu chữ cái Tiếng Anh (không phân biệt chữ hoa chữ thường)
Câu hỏi trong đề: Trắc nghiệm tổng hợp Tin học năm 2023 có đáp án !!
Quảng cáo
Trả lời:
Giải bởi Vietjack
Lời giải:
program Hello;
uses crt;
var ten,s,st:string;
j:char;
i,d,max:integer;
az:array['a'..'z'] of boolean;
begin
clrscr;
write('Nhap ten: '); readln(ten);
while ten[1] = ' ' do delete(ten,1,1);
while ten[length(ten)] = ' ' do delete(ten,length(ten),1);
while pos(' ', ten) > 0 do delete(ten, pos(' ', ten), 1);
ten[1]:= upcase(ten[1]);
for i:= 1 to length(ten) do
begin
if (ten[i] = ' ') then
begin
ten[i + 1]:= upcase(ten[i + 1]);
if max < length(s) then
begin
max:= length(s);
st:= s;
s:='';
end;
end;
if ten[i] <> ' ' then
s:= s + ten[i];
az[lowercase(ten[i])]:= true;
end;
for j:= 'a' to 'z' do
if az[j] = true then inc(d);
writeln('Ten da nhap: ', ten);
writeln('Tu dai nhat: ', st);
writeln('So luong chu cai: ', d);
readln;
end.
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Đang tải chế độ Học...
Hot: 1000+ đề thi giữa kì 1 lớp 1-12 đầy đủ các môn (Update 2026) (chỉ từ 60k). Tải ngay
Đăng ký VIP để học và luyện thi không giới hạn
Trọn bộ quyền lợi trên Vietjack, trong một tài khoản.
- Phòng luyện thi cấp tốc: ĐGNL - ĐGTD, Tốt nghiệp THPT, Ôn vào 10, Ôn vào 6, Ôn Giữa kì/Cuối kì
- Hơn 200K đề thi thử, đề minh hoạ, chính thức các năm
- Với 3tr+ câu hỏi theo các mức độ Nhận biết, Thông hiểu, Vận dụng
- Tải xuống đề thi [DOCX] với đầy đủ đáp án
- Xem hàng ngàn bài giảng đính kèm củng cố thêm kiến thức
- Bao gồm tất cả các bậc từ Tiểu học đến Đại học
- Chặn hiển thị quảng cáo tăng khả năng tập trung ôn luyện
- Đăng ký ngay
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 1
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Lời giải:
Đáp án đúng: D
Xem, sửa, bổ sung và xóa dữ liệu
Câu 2
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Lời giải:
Đáp án D.
Microsoft Excel không phải là hệ quản trị cơ sở dữ liệu quan hệ.
Câu 3
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Bạn cần đăng ký gói VIP ( giá chỉ từ 250K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Bạn cần đăng ký gói VIP ( giá chỉ từ 250K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.
Câu 5
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Bạn cần đăng ký gói VIP ( giá chỉ từ 250K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.
Câu 6
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Bạn cần đăng ký gói VIP ( giá chỉ từ 250K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.
Câu 7
Đăng nhập để xem lời giải
Lưu tiến độ và luyện tập hiệu quả hơn. Hoàn toàn miễn phí!
Lời giải
Bạn cần đăng ký gói VIP ( giá chỉ từ 250K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.
Đăng ký để học cùng Vietjack. Hoàn toàn miễn phí!
Bằng việc đăng ký, bạn đồng ý với Điều khoản sử dụng và Chính sách bảo mật của Vietjack.
Nhắn tin Zalo
Hỏi bài tập