0
0
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
2863
21141
program demtu;
uses crt;
var s:string;
d,i:word;
begin
clrscr;
write('Nhap xau: '); readln(s);
d:=1;
for i:=2 to length(s) do
if s[i]=' ' then d:=d+1;
write('Cau tren co ',d,' tu');
readln;
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
program dem_tu;
uses crt;
var st:string;
d,i:byte;
begin
clrscr;
write('Nhap xau: '); readln(st);
d:=1;
for i:=2 to length(st) do
if st[i]=' ' then d:=d+1;
write('Cau tren co ',d,' tu');
readln;
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
2863
41637
21141
sao lại cho mình 2*
0
10
0
Cám ơn ạ
2863
41637
21141
cho c.ơn+5*+ctlhn nha.