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

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

178
Продолжение прил,
unit morgen;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Buttons, ComCtrls, Menus;
Const
Word_max= 100;
Line_tnax=200;
colon=':';
period=‘.‘;
comma=‘,‘;
spase=‘‘ ';
equals='=';
definite=i00;
type
word_string=string[ word_max]; line_string=string[line_max];
value_ptr=^ value;
legal_ptr=^legal^value;
object_ptr=^objects;
value=record
name: word_string;
cert:integer;
setby:word_string;
next:value_ptr;
end;
legat_value=record
name:word_string;
next:legal_ptr;
end; 
                                                                         Продолжение прил,
unit morgen;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Buttons, ComCtrls, Menus;
Const
Word_max= 100;
Line_tnax=200;
colon=':';
period=‘.‘;
comma=‘,‘;
spase=‘‘ ';
equals='=';
definite=i00;
type
word_string=string[ word_max]; line_string=string[line_max];
value_ptr=^ value;
legal_ptr=^legal^value;
object_ptr=^objects;
  value=record
  name: word_string;
   cert:integer;
   setby:word_string;
   next:value_ptr;
   end;
  legat_value=record
   name:word_string;
       next:legal_ptr;
        end;




                                               178

Страницы