Js замена подстроки в строке
Автор Валера Лось задал вопрос в разделе Другие языки и технологии
Как в паскаль заменить подстроку в строке на другую подстроку и получил лучший ответ
Ответ от SeverSiter[гуру]
Доброго времени суток.
Для того, чтобы заменить Васю на Петю нужно три строчки программы (с проверкой - 4). Итак, пусть ваша строка находится в переменной Str.
i := Pos('Вася', Str); {в i позиция, с которой начинается слово "Вася" в исходной строке}
if i > 0 then begin {"Вася" таки нашелся}
Delete(Str, i, 4); {удаляем из исходной строки 4 симвла, начиная с позиции i}
Insert('Петя', Str, i); {вставляем в строку Str в позицию i слово "Петя" (все след. символы сдвигаются вправо) }
end;
Вот и все.
Удачи!
Источник: Нужно больше - юзай цикл!
Ответ от Krab Bark[гуру]
Надо писать, в какой из реализаций Паскаля. Например, в PascalABC.NET функция pos найдет и втторое вхождение.
Надо писать, в какой из реализаций Паскаля. Например, в PascalABC.NET функция pos найдет и втторое вхождение.
Ответ от TERESHI[активный]
var i:Integer; str:String;Begin str:='Вася пошел в школу. Вася, сказала учительница, ты дурак'; writeln(str); while pos('Вася',str) <> 0 do begin i:=pos('Вася',str) delete(str,pos('Вася',str),4); insert('Василий',
var i:Integer; str:String;Begin str:='Вася пошел в школу. Вася, сказала учительница, ты дурак'; writeln(str); while pos('Вася',str) <> 0 do begin i:=pos('Вася',str) delete(str,pos('Вася',str),4); insert('Василий',
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Как в паскаль заменить подстроку в строке на другую подстроку