Дана строка часть которой заключена в круглые скобки, вывести на экран то, что расположено внутри скобок! через Паскаль. Помогииииииииииите это очень важно!

var 
  t: char;
  flag: boolean;

begin
  flag := false;
  while (2 * 2 = 4) do begin
    read(t);
    if flag and (t <> ')') then
      write(t)
    else if flag then
      break
    else if t = '(' then
      flag := true;
  end;
end.