Bài 5. Từ bài toán đến chương trình

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Quốc Khánh Minh

hãy lập chương trình trên pascal tính số dấu cách trong xâu

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

uses crt;

var st:string;

d,i,dem:integer;

begin

clrscr;

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

d:=length(st);

dem:=0;

for i:=1 to d do 

  if st[i]=#32 then inc(dem);

writeln('So dau cach trong xau la: ',dem);

readln;

end.


Các câu hỏi tương tự
Kim Phụng Nguyễn
Xem chi tiết
Nguyễn Thị Ánh Ngọc
Xem chi tiết
Tên Có Ko
Xem chi tiết
Dionysus Bacchus
Xem chi tiết
Thành Tài
Xem chi tiết
lê thị yến phương
Xem chi tiết
Nguyễn Thị Thảo Hiền
Xem chi tiết
Ngân Hà
Xem chi tiết
Alice
Xem chi tiết