В тексте предложения заменить символ » «, на символы «,». Конечные символы удалить, не заменяя запятые. Определить длину предложения. Если в тексте встречаются несколько символов » » подряд, то вместо них поставить одну запятую — Pascal(Паскаль)

Program str;
Uses crt;
Var s: string; i: byte;
Begin
Clrscr;
s:='Строка, в которой пробел заменяем на запятую';
Writeln(s);
For i:=1 to length(s) do
If s[i]=' ' then s[i]:=',';
Writeln(s);
End.

Похожие записи/страницы:

Leave a Comment

+ 30 = 35