Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Vân Hồng

Viết chương trình nhập xấu S. Đưa ra số kí tự chữ cái trong xâu (bao gồm cả chữ hoa và chữ thường)

Bùi Anh Tuấn
31 tháng 3 2021 lúc 19:49

Nguyễn Lê Phước Thịnh
31 tháng 3 2021 lúc 22:14

uses crt;

var s:string;

dem,i,d:integer;

begin

clrscr;

write('Nhap xau:'); readln(s);

d:=length(s);

dem:=0;

for i:=1 to d do 

  if (s[i] in ['A'..'Z']) or (s[i] in ['a'..'z']) then inc(dem);

writeln(dem);

readln;

end.


Các câu hỏi tương tự
Trang Le
Xem chi tiết
Hong Trần
Xem chi tiết
Nguyễn Vy
Xem chi tiết
Võ Thị Thái Ngọc
Xem chi tiết
Thọ Phạm
Xem chi tiết
Huy Lê Đình
Xem chi tiết
Nguyen Ngoc Thien
Xem chi tiết
Khánh Mỹ
Xem chi tiết
nguyễn linh
Xem chi tiết