Помощь - Поиск - Пользователи - Календарь
Полная версия: строки
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
*(Slim)*
как написать прогу заменяющую в введенном славе "ab" на "bc"...
NorthAngel
Даже ТАКОЕ лень самостоятельно писАть wacko.gif

Код

if pos('ab',s)<>0 then
   begin
      insert('c',s,pos('ab',s)+2);
      delete(s,pos('ab',s),1);
   end;
klem4
ну только всетаки зациклить надо cool.gif
 while(pos('ab',s)<>0) do begin
insert('c',s,pos('ab',s)+2);
delete(s,pos('ab',s),1);
end;

Костет
А если надо удалить из введенного текста все слова, длина которых меньше 3 символов? Я тож нуп smile.gif
klem4
FAQ : Строки


delete(s, start, len);
volvo
Это - немного сложнее... Вычисляй позицию и длину каждого слова (о том, КАК это сделать - Разбиение на слова. Все способы), и потом проходи в обратном порядке (от последнего слова к первому), и удаляй (процедурой Delete) все слова, длина которых меньше 3-х символов...

klem4, пример приведи... rolleyes.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.