Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lê Tuấn Anh

Viết chương trình nhập từ bàn phím xâu kí tự S. Kiểm tra xem trong xâu S có bao nhiêu dấu cách, đưa kết quả ra màn hình.

Ai giúp em với ạ. E cảm ơn

Nguyễn Lê Phước Thịnh
14 tháng 5 2020 lúc 21:22

uses crt;

var i,d,dem:integer;

s:string;

begin

clrscr;

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

d:=length(s);

dem:=0;

for i:=1 to d do

if s[i]=' ' then inc(dem);

writeln('Trong xau ',s,' co ',dem,' dau cach');

readln;

end.


Các câu hỏi tương tự
Tiên Tiên
Xem chi tiết
Hiếu
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Ngô Thành Chung
Xem chi tiết
Võ Thị Thái Ngọc
Xem chi tiết
Nguyễn TRƯỜNG Giang
Xem chi tiết
B2_Đinh Thị Huệ
Xem chi tiết
Nguyễn thị tuyết nhung
Xem chi tiết
Anh Hoàng
Xem chi tiết