46     PLongWord = ^LongWord;

    46     PLongWord = ^LongWord;

    47     PInteger = ^Integer;

    47     PInteger = ^Integer;

    48 

    48 

    49     Handle = integer;

    49     Handle = integer;

    50 

    50 

    51 var

    53 var

    52     write, writeLn, read, readLn, flush, CreateDir: procedure;

    54     write, writeLn, read, readLn, flush, CreateDir: procedure;

    53 

    55 

    54     halt:procedure;

    56     halt:procedure;

    55 

    57 

    82     memcpy : procedure;

    84     memcpy : procedure;

    83     StrLength : function : integer;

    85     StrLength : function : integer;

    84 

    86 

    85      min, max:function:integer;

    87      min, max:function:integer;

    86     assign, rewrite, rewrite_2, reset, reset_2, flush, BlockWrite, BlockRead, close : procedure;

    88     assign, rewrite, rewrite_2, reset, reset_2, flush, BlockWrite, BlockRead, close : procedure;

    88 

    91 

    89     ParamCount : function : integer;

    92     ParamCount : function : integer;

    90     ParamStr : function : string;

    93     ParamStr : function : string;

    91 

    94 

    92     arctan2, power: function : float;

    95     arctan2, power: function : float;