Var a: string;
i, Dem: integer;
Begin
writeln[‘nhap xau:’];
Readln[a];
Dem:=0;
For i:=1 to length[a] do
If [‘0’
Viết chương trình: Nhập vào một xâu Dem và đưa ra màn hình số lượng kí tự là chữ cái trong xâu
Bài Viết Liên Quan
Toplist mới
#1
#2
Top 7 số 20 gồm 2 và 0 đúng hay sai 2023
7 tháng trước#5
Top 6 on tập tiếng việt lớp 7 học kĩ 2 violet 2023
7 tháng trước#7
Top 8 mơ thấy có người to tình với mình 2023
7 tháng trước#8
Top 6 nước yến cao cấp yến sào thiên hoàng 2023
7 tháng trước#9
Top 7 ví dụ về quyết định hành chính nhà nước 2023
7 tháng trướcBài mới nhất
Chủ Đề
Hỏi Đáp
Mẹo Hay
Toplist
Là gì
Địa Điểm Hay
programming
mẹo hay
Học Tốt
Công Nghệ
Nghĩa của từ
Khỏe Đẹp
Bao nhiêu
đánh giá
Top List
bao nhieu
bao nhiêu
hướng dẫn
Bài tập
So Sánh
Tiếng anh
So sánh
Xây Đựng
Sản phẩm tốt
Ngôn ngữ
Món Ngon
Bài Tập
Thế nào
Ở đâu
Tại sao
Hướng dẫn
Máy tính
Dịch
Đại học
Bao lâu
Khoa Học
Vì sao