Заданная строка, состоящая из слов, разделенные одним или несколькими пробелами

@NeProfan · Регистрация: 08.11.2014

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

Заданная строка, состоящая из слов, разделенные одним или несколькими пробелами. В словах которые заканчиваются соочетанем букв ing, заменить это окончание на ed.

@APALoff · 18.11.2014, 11:58

Pascal

Procedure IngEd(Var S : String);
Var k : Byte;
Begin
  While Pos('ing ',S+' ')<>0 do
  Begin
    k:=Pos('ing ',S+' ');
    Delete(S,k,3);
    Insert('ed',S,k);
  end;
end;

@NeProfan 0 / 0 / 0 Регистрация: 08.11.2014 Сообщений: 3
		1
	Заданная строка, состоящая из слов, разделенные одним или несколькими пробелами 17.11.2014, 22:00. Показов 1861. Ответов 1 Метки нет (Все метки) Заданная строка, состоящая из слов, разделенные одним или несколькими пробелами. В словах которые заканчиваются соочетанем букв ing, заменить это окончание на ed. 0

Опции темы

Заданная строка, состоящая из слов, разделенные одним или несколькими пробелами

Решение