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

Дано слово. Удалить из него все символы в скобках. Скобки в тексте встречаются только 1 раз.

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

Var s:string;
k1,k2:integer;
begin;
readln(s);
k1:=pos((,s);
k2:=pos(),s);
delete(s,k1+1,k2-k1-1);
writeln(s);
end.