Работа со строковыми переменными

@Вовка64 · Регистрация: 11.12.2008

Студворк — интернет-сервис помощи студентам

В строке между словами вставить вместо пробела запятую и пробел.

@Puporev · 19.12.2008, 20:04

Код

uses crt;
var s:string;
    i:integer;
begin
clrscr;
s:='12 35 68 56 78';
for i:= length(s) downto 1 do
if s[i]=' ' then insert(',',s,i);
write(s);
readln
end.

@Вовка64 1 / 1 / 0 Регистрация: 11.12.2008 Сообщений: 127
		1
	Работа со строковыми переменными 19.12.2008, 19:49. Показов 1082. Ответов 1 Метки нет (Все метки) В строке между словами вставить вместо пробела запятую и пробел. 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	19.12.2008, 20:04	2
	Код uses crt; var s:string; i:integer; begin clrscr; s:='12 35 68 56 78'; for i:= length(s) downto 1 do if s[i]=' ' then insert(',',s,i); write(s); readln end. 1

Опции темы