задачи по теме "Обработка строк" на Delphi 7

[matrix8325]

1.В строке заменить все двоеточия ( точкой с запятой (. Подсчитать количество замен.
2.Удалить часть символьной строки, заключенной в скобки (вместе со скобками).

[Sazary]

В чем проблема-то? Что не получается?
1. С помощью posex ищете двоеточия и заменяете на то, что надо. Ну и счетчик увеличиваете.
2. Ищете открывающую скобку (все тем же pos'ом или posex'ом). Запоминаете позицию. Ищете закрывающую скобку. С помощью delete удаляете все, что между ними (включая их самих).

[Serge_Bliznykov]

1)

k:=0;
for i:=1 to Length(s) do
   if s[i]=':' then begin
     inc(k); {нарастили счётчик замен}
     s[i] := ';'; {заменили}
   end;
WriteLn('Новая строка: ',s);
WriteLn('Число замен: ',k:1);

2.

Delete(s, Pos('(',s), Pos(')',s) - Pos('(',s) + 1);

p.s. это без проверок на наличие открывающей и закрывающей скобок, без проверки на то, что закрывающая стоит после открывающей и без учёта того, что в строке может быть несколько пар скобок (удалено будет от первой открывающей до первой закрывающей)

[Stilet]

Для Делфи есть StringReplace, которая поможет с заменой.
Тут неоднократно приводились по ней примеры.