Дан массив символов. проверить, одинаковое ли число открывающихся и закрывающихся квадратных скобок в данной строке.

PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadlnString('Введите текст:').ToCharArray;
  if (a.Where(c->c='[').Count)=(a.Where(c->c=']').Count) then
    Writeln('Число скобок совпадает')
  else Writeln('Число скобок не совпадает')
end.