паскаль. текстовые файлы. из текста расположенного в файле исключить группы символов расположенных между круглыми скобками

var a:string;b,c,v,s:byte;beginb:=0;c:=0;writeln('Введите строчку');readln (a);repeat inc (b); if (a[b]=' ') or (b=length(a)) then  begin  inc (c);  if (c=1) then  v:=b; if c=2 then begin if (b=length(a)) then  delete(a,v,b-v+1) else  delete(a,v,b-v); b:=b-(b-v); c:=0; end; end else continue;until b>length(a) ; writeln(a);readln;end.Это вот программа по подсчёту пробелов. Эту давно писал, а сейчас занят, поэтому даю только идею