Nhập vào 1 xâu , đếm tất cả các dấu cách ở đầu xâu VD input:" tin học" output:0
2 câu trả lời
program bai_giai;
uses crt;
var s:string;dem:longint;
begin
clrscr;
write('nhap xau s:');readln(s);
while s[1]=' 'do inc(dem);
write('dem=',dem);
readln;
end.
Câu hỏi trong lớp
Xem thêm
