Кому не сложно помочь с PascalABC?
Дана строка. Некоторые из слов взяты в круглые скобки. Написать программу, выводящую исходную строку без скобок.
Дана строка. Некоторые из слов взяты в круглые скобки. Написать программу, выводящую исходную строку без скобок.
More Questions From This User See All
Answers & Comments
Begin
Readln(S);
While Pos('(',S)>0 do Delete(S,Pos('(',S),1);
While Pos(')',S)>0 do Delete(S,Pos(')',S),1);
Writeln(S);
end.