Viết chương trình nhập vào một xâu ký tự từ bàn phím. Thông báo lên màn hình các chữ cái có trong xâu và số lượng của chúng ( Không phân biệt chữ hoa hay chữ thường).

Xem lời giải

Câu hỏi trong đề: Trắc nghiệm tổng hợp Tin học năm 2023 có đáp án !!

Bắt đầu thi

Quảng cáo

Trả lời:

Giải bởi Vietjack

Uses Crt;

Var St:String;

dem: Array[‘A’..’Z’] Of Byte;

i:Byte;

ch:Char;

Begin

Write(‘Nhap xau St: ‘); Readln(St); {Khởi tạo mảng}

For ch:=’A’ To ‘Z’ Do dem[ch]:=0; {Duyệt xâu}

For i:=1 To Length(St) Do

If Upcase(St[i]) IN [‘A’..’Z’] Then Inc(dem[Upcase(St[i])]); {Liệt kê các ký tự ra màn hình}

For ch:=’A’ To ‘Z’ Do

If dem[ch]>0 Then Writeln(ch,’ : ’,dem[ch]);

Readln;

End.

Hot: 500+ Đề thi thử tốt nghiệp THPT các môn, ĐGNL các trường ĐH... file word có đáp án (2025). Tải ngay

Sách thầy cô Vietjack biên soạn:

Xem thêm »

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1

Sự khác biệt giữa hệ điều hành và phần mềm ứng dụng

Xem đáp án

Lời giải

Phần mềm máy tính được chia thành phần mềm hệ thống và phần mềm ứng dụng. Phần mềm hệ thống là loại phần mềm được sử dụng để chạy các thiết bị phần cứng. Hệ điều hành, bộ xử lý ngôn ngữ và trình điều khiển thiết bị là một vài ví dụ cho phần mềm hệ thống. Phần mềm ứng dụng là loại phần mềm được thiết kế để đạt được yêu cầu người dùng cụ thể. Trình xử lý Word, bảng tính, trình duyệt web là một số phần mềm ứng dụng. Ngoài những loại này, còn có một phần mềm khác gọi là phần mềm tiện ích. Phần mềm này hỗ trợ các nhiệm vụ của hệ thống. Phần mềm chống vi-rút, công cụ quản lý tệp và đĩa là một số ví dụ về phần mềm tiện ích.

Câu 2