Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Кому не сложно помочь с PascalABC?
Дана строка. Некоторые из слов взяты в круглые скобки. Написать программу, выводящую исходную строку без скобок.

Ответ оставил Гость

Var S : String;
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.