.


:




:

































 

 

 

 





 

-, , . . : , , [22]. . : .

 

. . , :

q - -;

q .

, -, .

. 9.5 . . , , .

. 9.5.

 

:

q , , ;

q , , ;

q , , . .

. 9.5 , , , .

. , , . 9.6.

:

with _;

use _;

Package _ is

subtype is Natural range...

type is tagged private;

procedure (the: in out );

procedure (the: In out ;

teta: : si: : s2: );

function (the: ;

s: ) return ;

private

end _;

. 9.6.

 

: , .

:

with _. _;

use _. _;

Package _ is

type _ is access all ;

type is tagged private;

procedure (the: in out ;

: _);

function (the: ;

: _) return ;

private

type is tagged record

: :=

(1.1.10);

end _:

- .

 

, :

with _. _;

use _. _;

Package _ is

type is (. );

subtype is Natural range...

type is tagged private;

function (: ;

: : : )

return ;

procedure (the: in out );

procedure (the: in out );

procedure (: in out

);

procedure (the: in out

);

function (the: )

return :

private

type _ is access all ;

type is tagged record

: ;

: ;

: _;

end record;

end _;

, , , :

: aliased ;

: aliased ;

(. 30. 60. 90);

- :

(. ss);

. , . .

 

, , . , , .

( ).

.

1. - () .

2. - () .

3. - () -.

4. - () .

. .

 

(-) . /. () ().

, . (), . . ( ) .

, . . 9.7 () (, , ) . , .

. 9.7.

 

. 9.8 (, ) . , , . , .

. 9.8.

 

, . ?

:

q ;

q .

 

. . .





:


: 2018-10-18; !; : 264 |


:

:

, ,
==> ...

1295 - | 1257 -


© 2015-2024 lektsii.org - -

: 0.016 .