Pascal abc Паскаль Из заданной строки удалить те части, которые заключены в скобки вместе со скобками. Помогите, пожалуйста, срочно
var s:string;
BEGIN
readln(s);
delete(s,pos('(',s),pos(')',s)-pos('(',s)+1);
writeln(s);
end.