Распознаватель заданной символьной цепочки. Символьная цепочка задается с помощью формул Бэкуса-Наура. В моем варианте (J): <цепочка>::=<описание типа>
<тип>::=array[<нижняя граница>..<верхняя граница>] of <строковый тип>
<нижняя граница>::=<целая константа>
<верхняя граница>::=<целая константа>
<длина>::=<идентификатор>
Программа эта написана на Turbo Pascal.