Курсовая работа: Разработка и отладка формального языка

KTL = KLASS ( TL ); {определяем класс TL }

STRCOPY (LE, "»);

Подпрограмма TIP (определение типа):

IF KTL = 2 {цифра}

THEN {можно определить тип лексической единицы}

TLE = 2;

MDLE = 7;

ELSE ERROR (« ошибка »);

Подпрограмма BKL (включение):

NLE++;

IF NLE>MDLE

THEN ERROR (« ошибка »)

ELSE LE = LE || TL;

Подпрограмма SLL (следующая литера)

NTL ++;

TL=A [NTL];

KTL = klass (TL);

Подпрограмма ZAPTAB (LE, TLE, ALE, REZ):

Осуществляет поиск лексической единицы в ТК. Для постоянных таблиц эта подпрограмма только определяет адрес LE, однако, во временные таблицы она еще и записывает лексическую единицу.

Запись элемента в ТСС можно осуществить с помощью процедуры OUT (TLE, ALE).

Таблицы сканера для тестовой цепочки

Private Sub D11 () Dim A As Integer, B% As Integer Const D As Single Dim M (2) As Integer A = (B/2 + 9)^10 If ((IsNumeric (A) <>0 and A>0) Then MsgBox («A is number», vbOkOnly) EndIf Text. Text = A End Sub

Таблица 6. Константы

Константа	Атрибуты
	Тип	Запятая	Точность представления	Основание системы счисления
« 7 8 9 10 11 12 13 14 15 16 » К-во Просмотров: 666 Бесплатно скачать Курсовая работа: Разработка и отладка формального языка >>> Скачать <<< Меню Поиск