Sau khi thực thi chương trình sau, biến S có giá trị:
Var S: String; i: byte;
Begin
S:= ‘Hoang Sa Truong Sa’;
for i:=1 to length(s) do
if s[i]=’ ‘ then Insert(‘-‘,s,i+1);
End.
Sau khi thực thi chương trình sau, biến S có giá trị:
Var S: String; i: byte;
Begin
S:= ‘Hoang Sa Truong Sa’;
for i:=1 to length(s) do
if s[i]=’ ‘ then Insert(‘-‘,s,i+1);
End.
Hoang -Sa -Truong -Sa của bn đây.
Hoang -Sa -Truong -Sa