Bài 2: ĐẾM KÍ TỰ SỐ (6.0 điểm)
Cho xâu S có độ dài không quá 1000 kí tự.
Yêu cầu: Đếm số kí tự chữ số có trong xâu S.
Dữ liệu vào: Ghi xâu S trên một dòng.
Dữ liệu ra: Ghi một số duy nhất là kết quả tìm được.
Ví dụ:
Dữ liệu vào
Dữ liệu ra
Dữ liệu vào
Dữ liệu ra
1a2bc23
4
Ha noi thang 8 nam 1945
5
var s:string;
i,d:integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i] in ['0'..'9'] then inc(d);
readln;
end.
\begin{array}{c} \color{#db1616}{\texttt{#Khoadang09}} \end{array}
`@`$\texttt{Pascal}$
- Phương án : duyệt xâu từ 1 → n, dùng kiểu dữ liệu hằng số ['0'..'9']. Nếu ký tự s[i] thuộc tập hằng số trên, tăng biến đếm
*Code :
var s : string;
i, count_num : longint;
const number = ['0'..'9'];
begin
readln(s);
count_num := 0;
for i := 1 to length(s) do
if (s[i] in number) then inc(count_num);
write(count_num);
end .
Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!
Lớp 7 - Năm thứ hai ở cấp trung học cơ sở, một chuỗi quay mới lại đến và chúng ta vẫn bước tiếp trên con đường học sinh. Học tập vẫn là nhiệm vụ chính, hãy luôn kiên trì và không ngừng cố gắng!
Copyright © 2021 HOCTAPSGK