Очень нужно в паскале. дана строка, где есть одна открывающаяся скобка, одна закрывающая...

Question

Очень нужно в паскале.
дана строка, где есть одна открывающаяся скобка, одна закрывающая скобка,удалить все символы между скобками

Answer 1

Program fufufuf;
var s:string; i:integer;
begin
readln(s);
i:=1;
while s[i]<>'(' do i:=i+1; i:=i+1;
while s[i]<>')' do delete(s,i,1);
writeln(s);
end.

Comments

спасибо))