Основы построения и функционирования интеллектуальных информационных систем. Былкин В.Д - 94 стр.

ИЛИ на пустое значение nil (если значение отсутствует). В последующих определениях левая часть

равенства будет представлять описание указателя, а правая часть - тип определяемой области:
       vaIue_ptr=^value; object_ptr =object;
        Следующие определения типа создают запись, которая будет содержать имя значения до 40
символов длиной и связанный с ним указатель. Остальная часть этого описания не используется в
первых модулях, которые мы создадим, но будет полезна при разработке модулей, которые мы
создадим позже:
Value=RECORD
name:word_string;
       cert: integer;
       setby:word_strin
       g; next:value_ptr
       END;
        Следующее определение типа также понадобится нам позднее:
legal_ptr=value; legaI_value=RECORD name:
     word_string;
next:Iegal_ptr
END;
       Теперь создадим запись, которая будет содержать имя объекта, длиной до 40 символов,
указатель значения и указатель объекта. Указатель значения - это поле, указывающее на имя
значения в списке значений; указатель объекта — поле, указывающее на следующий узел в
текущем списке объектов. Не все эти определения будут применены немедленно, но со временем
они пригодятся:
     object=RECORD
     name:word_string;
       question:word_string;
       multivald: boolean;
       legal_list: legal_ptr;
       sought :boolean;
       value_list:value_ptr;
       next:object_ptr END;




                                               94