• 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 
 • 




-

. 038i .. - 1994
1.
2. -
3. 3.1. . 3.2. . 3.3. 3.4. . 3.5. 3.6. -
4. 4.1. . 4.2. 4.3. . 4.4. .
5.
6.
,

- .
,

.
,
, ,

.
-
.

, -
,

.

.
-
, "
"
- . ,
,
,
,

N , .
, ,


.

.

,

-
. (,i,,),
,
.
.


.
-
.


- .


.

. 1. .

,

.
,

,
.
,


.

.
.
.
(, Tst1 - ). 2. - . -
, ,

.
.
,
,

,
. ,
, ,
- ,
. Ŀ Ŀ > V Ŀ V Ŀ Ĵ
, -
.
, ,
. ,

,
:
, -, -,
, -.

, ,
,
,
.. .

, . - ,
- ,
,
, . -
- .
,
.. -
, , ,

.
: -,
-, - , ,
,
. 3. .
3.1. .
,
.
() .
,
.
,
, ,
.

,
,
().

.

,

.

.
3.2. .
: - (),


; - (),
.
3.3.

.
(
, ,
),
.
,
. ,

,
" ".
,
",
".
,
.
3.4. . ,

. ,
,
,
(

),
, .

, ,
" ".
3.5. ()
5 .
t ( t =
1,2, ... ), ,
_t _t ,
, .. t = 0,
s
s, ,
: _1 + _1 _ + _ s + s = ... + , 1 (1 + ) (1 + ) - (). , _t
_t
, .. _t =
_t = = * N , : 1 1 s + s = ( + * N ) * [ ... + ], 1 (1 + ) (1 + )
.


: (1 + ) - 1 s + s = ( + * N ) * . * (1 + ) , ,
t =
.
_
_
: Ko_o = Ko * (1 - a_o * T / 100) ; K_o = K * (1 - a_ * T / 100) ,
,
t = t = 0 -
, (1 + ) . ,
,
, ,

() : (1 + ) - 1 _ + _
( + * N ) * + >= . * (1 + ) (1 + )

()
.
: (1 + ) - 1 _ + _
= ( + * N ) * + - * (1 + ) (1 + )
3.6. -
Ŀ
- -


1 2
Ĵ
1. -
, . 54 56

2.
, . 82.8 82.5

3. , .. 7.7*10^4 8.6*10^4
:
3.1. .. 1.1*10^4 1.2*10^4
3.2. .. --- ---

4. .. 8.6 8.8

5. .. 3.6*10^5 3.6*10^5

6. .. 8.6*10^4 8.1*10^4

7. , .. 10^5 10^5
:
7.1. .. 6.5*10^4 6.5*10^4
7.2. . .. 3.8*10^4 3.5*10^4
7.3. .. 7.6*10^3 7.8*10^3


8. , .. --- ---
:
8.1. .. --- ---
8.2. .. --- ---

9. , .. 4.0*10^4 3.7*10^4
:
9.1. .. 3.6*10^4 3.3*10^4
9.2. .. 3.4*10^3 4.3*10^3

10. .. 1.1*10^4 1.2*10^4

11. .. 1.3*10^4 1.2*10^4

12. % 200 200

13. .. 8244 6784
4. .
,
,
, - .
4.1. .
. n0

() n0 = ( 1, 2, c3,c4, c5, c6, c7, c8, c9, c10 ) =120
( ): 0 = n0 * tau = 120 * 5.038 = 600
4.2.
.
>15,
. l
,
: l = 0.75 .
( ) : S = d * l = 1 * 0.75 = 0.75 .
, : vp = S / tau = 0.15 /. 0.1
-EE
E EEE EE
E E

EEE
E E
" EE E
E "
-ee
1994
E E
e
e e ........ 3
ee
e ....................... 4
1. e
e e ................... 4
2.
-
e ee
............................................
6
3. ee
e e .......... 9
4.
e e ................... 20
ee
............................................................ 22
-
3 -
E E
E
ee e e
e e e,
e e ee
e - . e e e
e e, e
e .
e e e ee e, e ee e,
, ee e e
eee .
e e ee
e e ee -e e
e.
e e eee ee eee e
eee e e e,
- e,
eee e ee e
e. e e e e
e e e
e .
e e
e e e. , e
e e, ee e e, e
- ee .
e-e e
e e 4 (210*297) e:
1) e e;
2) eee, eee
e ,
- e, ;
3) e
e
e;
4) -
e ee;
5) ee
e e;
6)
e e蠠 e-e頠 ee
e;
7)
e e;
8)
ee e e;
9)
e
 ࠠ e
,
e e e 3;
10) - , e
e e 3;
11) ee ee
e;
12)
e;
13) ee.
-
4 -
EE E

ee젠 e頠 頠 e
-ee e  e,
ee
砠 ee 젠
Ԡ "Π e
ee ee" -
.
ee, 
ee ee e ,
e
eee
eee e蠠 e,
e e
e ee, e e
e ee ee
e
e N
, eee e e e.
e ,
ee, 
ࠠ ࠠ
蠠 e

 e e e
ee ee e
.
ee ee e e
ee ee e e ee
e e.
e e e e
e e e e ee
e e e, e
e e e -e e
e.
e e (,i,,), e
e, ee e e .
ee e ee e
e . e e e e
e ee e e e
ee e e e
e. e ee -
e e . e e e
e ee
e e e e -
e. e ee e e e
e e e
e e. ee e
e e e.
e ee
e e.
1. e e
e.
e e ⠠

e e e
ee e
ee
e, e
e
eee 砠
e .
e e ee e, e
eee e ee e e
e e ee, eee e
e.
-
5 -
ee ee e
ee e , ee
ee e e
e eee ee ee ee e. e
ee e e ee e
e e e. e e
e ee ee.
1.1. e e
ee e:
toi = ti / (1 + (alfa + betta) / 100),
e alfa = 2 - 3% - e ee eeee ;
betta = 2.5 - 3.5% - e ee e
e e;
ti - e e e i- e
e ee e.
1.2. e
e ee :
= ( T - t ) * * K,
e T = 480 . -
e e;
t = 15 - 20 -
e eee
ee e.
= 260 e -
e ;
K - e e .
e e e e
e. e e e e
e e e , e e
ee e ee e. , e
e e e eee
e . e , e
e e ee e e,
e e e e ee
e. , e
e e ,
e e. e e, e, e
e 50%, e e - 100% .
1.3. e .
"tau" - e ee e e
e. eee ee e:
tau = / N,
e
N - e e.
1.4. e e
e :
Ci = ] ti / tau [ ,
e ].[ - e , e
e e; i - e e.
-
6 -
1.6. e e e
:
m
C = Ci, i = 1
e m - e
e ee e.
1.6. eee ee
e, ee ee ee,
+1. ee e, ee
e, :
Z = 2 * C + 1.
ee e e
e e, eee e, e:
Z = Z = 2 * C + 1.
1.7. e
:
= C * ,
e
:
o
= ] 1.1 * [ ,
e
].[ - e , e e e e.
2. - e
ee.
2.1. - e
eee , e e, e
e e ee ee.
-
e e e e , e
e e, e e e
e e e e
e e, ee
" e ee ee".
e ee
e e
- , e ee e, e
e ee (ee e ),
ee e . ee ee
e e ee , ee
ee (eee) e e,
e e,
- .
-
7 -
e e ee e
ee ee e e
e e.
e e , ee
ee e e e. E e
- e, e e e
ee e.
2.2. e
- e e e
e e ee,
" e ee ee"
-ee e. e
e e e , e
ee .1.
e e ee e
e (), e e () ee
e e , e e .
eee ee e
e e e e
e . e e
e ee e e e
e .
e eee e e e, e
-ee eeee eee ee
e ee e, e, e ..
----------------------- ---------------
| e e -------->| e |
----------------------- |
|
V --------------- e
V e e e ee e e
.1. e
e e
e e
e e e e, e - e
ee . ee e e e e,
e e, e e e
e. e eee e
e. , ee ee e e
e ee e e ee, ee
e e: e e,
ee-e, e-, e, ee-ee.
-
8 -
e e eee ee
e ee e eee ee
, e , eeee
ee e, ,
e e .. e ee ee ee
. ee e e ee
e, ee e .
ee-e ee e , e
ee -ee e , ee
ee e, ee ee e
eee , e e.
e- ee e
e eee e. e ee e
e e , e e e
..
ee-ee ee e e
ee, ee , e e, e e
eee e e.
e e e
e ee ee e , ee
, e ee e
e e. e, e e
e ee-e. e ee-e
e e e e ee ee
e - e e.
.
eee eee
e ee e ee
, e e
e ee e e .
ee ee e e, ,
e ee e .
e ee
e eee ee: e-e, e-e,
e-e, ee, e, e
ee.
e e
, e e ee. ee
e e, e e e. e, e
ee, ee ee , e
e-e. ee , e e,
ee e .
ee e - e,
e, e, e e,
e 1.5 - 1.7 e eee,
e e 0.7 - 0.8
.
3.
ee e e.
e ee
, e ee e
. e e
e eee (e) e. e e
ee e e,
e e , ee e
e ee e ee, e e eee
e.
e ee e
e e e ee ee
ee e ee,
ee, e ee e e.
ee e ee ee
ee ee , eee ee e .
ee ee e e e
ee e , , e e,
e e e e e. e
e e e ee e
e, e e
e, ee (e).
ee e
e ee eee e ee e .
e e e e
e e ee eee
e e , ee e
ee e e e.
e e e ee e e
e ee e e
e.
3.1. e
.
3.1.1. e eee
e, e
e, e e:
K = K + Ko + K,
e -
eee , .;

- e e e ee , .; - e
e e e, .
3.1.2. eee ( )
, ee ee e ,
e, -, ee, e
e e.
e eee e
e e ee e ee e
e e
ee e.
-
10 -
3.1.3. e
e , e ee eee
e ee , ee , ee
ee e . e ee
e , e, eee , e,
e e, e e e, ee
.
蠠 e蠠 頠 e e
e
e
e:
= + ,
e - e e e,
e, eee , e e e;
- e e ee
e (ee).
3.1.4. e e e,
eee , e, e e e
ee e:
m
Ko = Ci * oi * (1 + a_ / 100) * a_, i = 1
e i - e e (e
e e) i- ee e, .;
i - e e
i- ee e, .; a_ - ee ,
e
, , , % ;
a_ - e, e e ee
, e, e
e e
.
i e e e
; i, a_ a_ .
3.1.5. e e ee
e ee ee e:
K = ( Ѡ +
+ ) * * ,
e , , - ee e e
, e e, .; ˠ - ee e e,
..; - e , .
e e e e
; e e e e
e () e ()
e e ee e e
e; .
-
11 -
3.1.6. e
eee e e e
e e. e e e e
e e e e e
e e e e. e e
e e
e ee e.
e ee - ee ,
e ee . e, e,
ee e, e (ee )
ee (eeee ). e
e e e
e e ee e
.
e ,
e e e, e ee ,
e e ee e e ee e
e. e e ee e, ee
e , e, e ee. ee
eeee e e e e
e - ee. ee eee e
e e e e e
e , e
..
e e , eee
, e e ee
ee e e e ,
e , ee
e , . ee
e e e e, eee
e ( , ) e ee e.
3.1.7. e e ⠠ ee e e
ee
:
= + +
+ ;

= * A / 2; A
= * N / 260;
= ( + ) *
Z * K;
m
= * / 60 * ti; i = 1
= * * K *
N / 260;
= * * N / 260 ,
e , , , - ee e
e e , eee e,
e e e ee , .;
砠 - e , ;
A䠠 - ee e
, ./e;
- eee e
e ee, .;
-
e ee, .;
K - ;
- e
e, ./.;
蠠 - e e,
.;
- 12 -
o - e ,
;
蠠 - e e, .;
Kᠠ
- e, ee ee e.

e e, 
= 0.5; K = 0.55.
e , , N, , t, , ee
, Z e e e . e
2- e ee e ee 25%, 3-
e - 50%.
, ee ee
ee ee , e e
e () ee e . ,
e e ee,
e e e e.
3.1.8. e e ee,
e e e ee.
e , e ee e
ee , ee e
.
e e ee e
eee e:
= + + _ ,
e _
- e ,
ee
ee e, .
e _ e e:
_ = - _ - _ ,
e _, _ -
ee
ee
ee, .
e e _ _
eee e
e.
3.2.
.
3.2.1.
:
- e e (), e
e e e e
e eee e ;
- e (), ee e e
e ee.
e
e e e e
e e
- e. e e ee
e e e ee
ee e.
-
13 -
e , e e
e e 75% e .
= +
3.2.2. e e
e e eee e:

= * Na_i , i=1
e Na_i - e
, ee e e, .
a - , .;
נ - e e e
(e).
e e e
e e , ee e e.
e e e eee e e
. e e e
e . e e
1000 .
3.2.3. e e e
e e eee e e.
eee e ee, e
ee e eee
ee e.
3.2.4. e e e e
eee e ee,
e ee e.
e ee
e e e: e

e,
e
, e e e e e
e e
e.
e e e
e e ee e .
3.2.5. e e,
e ee e
e ee e e e
ee e, e e (e ).
3.3. e ee
3.3.1. ee ee
ee ee e ee e ee
e. ee eeeee
( e , ,
e e e), e
e e e ee .
-
14 -
e ee
, e e e
e e. ,
e e e ee ee ,
ee e
"e ". e , ee ee e
", e
ee". e
ee, e e e.
e e ee ee
"e ", e e -
" e".
ee ee e e
e ee e e, e e e
ee e e e e . e
e e e e e , ee
ee , ee "
".
3.3.2. ee e e eee
, ee e 3.1.
e, e
:
a_ - e ,
% ;
a_ -
e e , % ;
- ee 1 -
(e e ), .;
a_o, a_ -
ee ee % ; _, _
- ee
蠠 ee,
ee
ee e, .;
a_ - e, % ;
a__ -
e ee, % ;
a_k - , % ;
, - ee
e e, .;
a_ - , eee
, % ;
a_ - , e
ee , % ;
a_
- , e , % .
e , ee,
e e e eee
e e e.
e a_, a_, , _, _, a_, a__,
a_, a_, a_, a_ e - ,
ee e.
-
15 -
3.1. e ee ee ee - ee e ee e ee- e e e e e e e e ee , e ee e e e eee e = + + + = + + + + + + + + + e m = * / 60 * ti , i = 1 e = 1 = 1; = 1.25 = 2; = 1.5 = 3; = * a_ / 100 = ( + ) * a_ / 100 m = / 60 * ti i = 1 a = (a_o * Ko_) / (100 * N) + + (_a * K_ ) / (100 * N) = ( _ + _ ) / N _ = (_ + a__) * _/100 _ = (_ + a__) * _/100 = / N * ( 1 + a_ / 100 ) = * a_ / 100 + + ( + ) * (1 + a_ / 100) * * (1 + a_ / 100) / N = * a_ / 100 = ( + ) * a_ / 100 = ( + ) * a_ / 100
-
16 -
3.4. e eeee .
e e ee,
e ee e ee ee e.
, e ,
ee eee eee e eee, e
ee
e ( e
e e
e
ee eee
),
e e e ,
e
ee
ee e. e e e
e e e , eeee e
e , ee
"ee ".
e eeee e ,
ee e ,
ee, ee e 3.2.
e, e
:
a_ -
e , % ;
a_e, a_ -
ee e, eee e ee
e
e, % ; a_ - , % ;
- eee
e e e e, .;
a'_ -
ee
e e
e, % ;
a_ -
e, % ;
a_ - e
, % ;
a_ - e
, % .
eee () eee
e e e (e) ,
e ee , e e e,
e e e [*]:

= N * + + - 6*min*(++)*12
e a_, a_e, a_, a'_, a_, a_, a_
e - , a_ e
e e. e ,
e ee e e e 50%
e e . e , e
e e eee e.
eeee e
eeeee e e e e, _ ( e
eee e ) e eee ee
e - e a_e a_, e e
e e e e e e,
e ee ee e.
_________________________
[*] 01.01.94. ee ee
e, 6 - e
e ( min = 14620 . ) ee e
e.
-
17 -
3.2. e eeee ee ee - ee e e e e e e ( e- ) e *) ee *) ee e- e , eee e ( e e) - e, e e (- e eeee e e _ = * N = ( - ) * N = * a_ / 100 = - * N - = K * a_ / 100 = * a_ / 100 e = K * a_e / 100 = ( - e - - ) * * a_/100 + * a'_/100 = + + + = - - - - e _ = * a_ / 100 = N * a * a_ / 100 = - _ -
*) ee e e
e
-
18 -
3.5. e
e e e e ()
e 5 . E e e e e
e e t ( t = 1,2, ... ),
e e e, ee _t _t
, ee e e, .e. e t = 0,
e e e e s
e s, e e e , eee ee:
_1 +
_1 _2 +
_2 _Ҡ +
_
s + s =
--------------- + --------------- + ... + --------------- ,
1 2
(1 + E) (1 + E) (1
+ E)
e
E - ee ().
e, e _t
e e _t e
e e e, .e. _t = _t = = * N ,
e ee ee :
1 1 1
s + s = ( + * N ) * [ --------- + ---------
+ ... + --------- ], 1 2
(1 + E) (1 + E) (1 + E)
ee ee ee eee e
e eee e. e e e e
ee ee ee e
e :

(1 + E) - 1
s + s = (
+ * N ) * -------------- .

E * (1 + E)
e , e e, e
e e t = e
ee e e .

_ ee _ ee
ee :
Ko_o = Ko * (1 - a_o *
T / 100) ;
K_o
= K * (1 - a_ * T / 100) ,
ee e e,
e e t = e t = 0 ee
-
e , (1 + E)
.
, e e
e e, e ee e e
e e , e ,
ee e e ee e e
e () :
-
19 -

(1
+ E) - 1 _ + _
( + * N )
* -------------- +
-------------- >= .
Ҡ
E * (1 + E) (1 + E)
 
e蠠 eࠠ E e 頠
ee

e e
ee ꠠ
(ee)
e
e. 蠠
젠 e頠 e
e
eee e:

(1
+ E) - 1 _ + _
= ( + * N )
* -------------- +
-------------- - .
Ҡ
E * (1 + E) (1 + E)
e , eee
e e e e ,
e e e e e. e
e, e , ee e e
= * ( 1 + a_ / 100
),
e
e ee e, e
e ,

e
(. . 3.1.).
e
e e e e
e
t=1 e e
ee e:
1 Ҡ 1
= (_1 + * N)
* ------ + (_T + * N) * --------- +
1
+ E t=2 t
(1 + E)
_ + _
+ -------------- -
.

(1 + E)
e: _1 -
,
ࠠ e ࠠ

e
. 3.1. 3.2. ;
_ - ,
ee e.;
e e, ee
e e e (. . 3.2.) e
e ee e e e
e e, a_ ee 30% , e
e e e a_ 5 e e eee
e e.
E e > 0 , e
e ee. e ,
e ee e e e ,
e e e e e. ,
e e e e ee ,
ee, ee e e. e
e eeee e e
e, e e.
e e ,
eee ee e e e.
e ee e e e
e e.
3.6. e e e-e ee
e
e e e
ee e-e ee
e ee e (.3.3.). ee
e e e ee
e, e , e
e, ee ee , e
e .
4. e
e
e e
e eeee e, e e
ee, ee e e ee , ee
- ee.
ee e e
e e e :
", e ee ee" / e.
..ee,
... - .: ,
1985. - . 16 - 25. [ . 1.2.4. - 1.2.7. ] .
-
21 -
3.3. e e ee e e - ee E- e- e ee e 1 2 1. ee e , e 2. eee e, 3. , e e: 3.1. e 3.2. e 4. ee 5. e 6. e 7. , e e: 7.1. e 7.2. . e *) 7.3. ee ee *) 8. e, e e: 8.1. e 8.2. ee e *) 9. e, e e: 9.1. 9.2. e e *) 10. ee 11. 12. e e 13. e e ' ' D ' e a__ e. . .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. % ..
*) e '
e e: ' = -

e
ce e: = *
N
e '
ce e: ' =
* N
e '
ce e: ' =
* N -
-
22 -
ee

- ee e - ee E. . e. 1. e . 2. e e e: - e e e - e e - e ee e - e 3. Cee - 4. 5. ee 6. e 7. . ee 8. 9. ee 10. , e ee 11. , e ee 12. e 13. e ee e 14. 15. ee e e e e 16. C e 17. e 18. e 19. ee (), 1/ a_ a_ a_o a_ a_ a__ a_k a_ a_ a_ a_ a_e a_ a'_ a_ a_ a_ E % % % % % % . % % % % % % % % % % % % % % % 1/ 18.0 39.0 5.4 28.0 3.6 2.0 60.0 10.0 4.0 200.0 50.0 25.0 5.0 4.0 5.0 23.0 15.0 35.0 48.0 2.0 5.0 30.0 2.0
_
-











. 038i
..
-
1994



1.

2.
-

3.

3.1. .
3.2.
.
3.3.
3.4. .
3.5.
3.6.
-

4.

4.1. .
4.2.

4.3. .
4.4. .
5.

6.




,




-
.

,


.



,

, ꠠ
,



.




-


.




, -

蠠 頠
, 


. ࠠ
頠 堠 

蠠 ࠠ

.
젠 頠

-堠 堠
,
"
蠠 蠠

"
- .
蠠 ,

,


,

,




N , .
, ,







.






.






,




-
.

(,i,,),

,


.



.






.


-

 .



蠠 


-
.





 . ࠠ




.
1.
.








,



.


,



, 
.



,







.




.


.



.


(,
Tst1 - ).
2. -

.
-

,
,


.



.

堠 頠
蠠 ,

, ꠠ ꠠ




,
.

,

,
頠 ,
-
,

.

Ŀ Ŀ

>
٠

V
Ŀ


V

Ŀ


Ĵ






 



, -

.


, ,


. ,




⠠ ,
젠 :

, -,
-,
,
-.





,

,
頠 蠠

,

,
..

.



, .
- ,

- ,

,

, .
-

-
.


,

..
-

,
, ,
堠 

.




:
-,
-, - ,  ,
, ꠠ 蠠 ꠠ
.
3.
.
3.1.
.




,



.

()
.


堠 ,

.  


,
,
,

.





,
頠 ࠠ
ࠠ ,

().




.






,




.




.
3.2.
.

:
- (),






;
- (),


.
3.3.







.  



(
,
,

),




.


,


.
,
 


,


" ".
,

", 堠

".


,

.
3.4.
.

젠 ,
젠 堠

. ,


, 堠

,


(

 蠠


),

,
.
Ѡ



,
,

" ".
3.5.

()

5 .



t ( t =
1,2,
... ),
,
_t _t
,
, ..
t = 0,


s 蠠

s,
,

:
_1 + _1 _Ҡ + _
s + s = Ġ ... + ,
1
(1 + ) (1 + )

- ().
,
_t

_t

, .. _t =
_t =
= * N , :
1 1
s + s = ( + * N ) * [ Ġ
... + ],

1
(1 +
) (1 + )



.
堠 頠




:


(1 + ) - 1
s + s = ( + * N ) * .


* (1 + )

, ,


t =



.

_


_
:
Ko_o = Ko * (1 - a_o * T /
100) ;
K_o = K * (1 - a_ * T / 100) ,

,

t = t
= 0 -

, (1 + ) .

,

,

, ,



() :

(1 + ) - 1
_ + _
( +
* N ) * Ġ +
Ġ >= .
Ҡ
* (1 + ) (1 + )




⠠ () 蠠 ꠠ


. 젠


:

(1 + ) - 1
_ + _
= (
+ * N ) * Ġ +
Ġ -
Ҡ
* (1 + ) (1 + )
3.6.
-



Ŀ
-
-




1
2
Ĵ
1.
-

,  .
54 56


2.


, .
82.8 82.5


3.
,  ..
7.7*10^4 8.6*10^4
:

3.1.
렠 ..
1.1*10^4 1.2*10^4
3.2.
򠠠 ..
--- ---


4.
蠠 ..
8.6 8.8


5.
.. 3.6*10^5 3.6*10^5

6.
.. 8.6*10^4 8.1*10^4


7.
,  ..
10^5 10^5
:

7.1.
..
6.5*10^4 6.5*10^4
7.2.
. ..
3.8*10^4 3.5*10^4
7.3.
..
7.6*10^3 7.8*10^3




8.
,  ..
--- ---
:

8.1.
ࠠ ..
--- ---
8.2.
蠠 ..
--- ---


9.
, .. 4.0*10^4 3.7*10^4
:

9.1.
..
3.6*10^4 3.3*10^4
9.2.
..
3.4*10^3 4.3*10^3


10.
䠠 ..
1.1*10^4 1.2*10^4


11.
..
1.3*10^4 1.2*10^4


12.
⠠ %
200 200



13.
򠠠 ..
8244 6784

4.
.



,


,
,
- .
4.1.
.



.
n0



()
n0 = ( 1, 2, c3,c4, c5, c6, c7, c8,
c9, c10 ) =120

( ):
0 = n0 * tau = 120 * 5.038 = 600
4.2.




.

>15,


. l


,

:
l = 0.75 .


(
) :
S = d * l = 1 * 0.75 = 0.75
.

,
:
vp = S / tau = 0.15 /.

0.1 <= vp <= 5 /.,


,

,

,
.





,


..

,

,



,


.





.
4.3.
.

Lp :
Lp = l * ( c + 1 ) = 0.75 * 45 =
33.75

:
Ln' = 2 * Lp + L= 70
L
= 2.5 - ,

.
堠 頠




,


S * n0 =90. , Ln=90.
4.4
.

.
3
.
Ŀ

ࠠ 蠠
Ĵ
1 1,2,3,4,5
8


2
6
10


3
7
15

Ŀ
𠠠
𠠠 ࠠ

蠠 ࠠ

Ĵ
1
1 1 5 1
2 2 6
3 3 7
4 4 8
Ĵ
2
5 1 5 1
6 2 6
7 3 7
8 4 8
Ĵ
3
9 1 3 5
7 1
10 2
4 6 8
Ĵ
4
11 1 3 5
7 1
12 2
4 6 8
Ĵ
5
13 1 1
14 2
15 3
16 4
17 5
18 6
19 7
20 8
Ĵ
21 1 2
22 2
23 3
24 4
6
25 5
26 6
27 7
28 8
29 9
30 10
Ĵ
7
31 1 3
32 2
33 3
34 4
35 5
36 6
37 7
38 8
39 9
40 10
41 11
42 12
43 13
44 14
45 15

5.
 


- ⠠


,


,
-
,



,

.
#include
<stdio.h>
#include
<ctype.h>
#include
<conio.h>
#include
<math.h>
int
calc_var(float *Tst,float *Co,float,int n);
int N;
float
Ciz;
float
alfa_t,alfa_of;
float
S,Cp,Dpz,Rmp,Rch,Dgi,Dop;
FILE*
fhOut;
main(int
argc,char** argv)
{
int i,j;
int file;
FILE* fhIn;
float Tst[2][10],Co[2][10],Kpr[2];
int n1,n2;
if ((argc<2)||(argc>3)) {
printf(" usage: opup
<infilename> [<outfilename>]\n");
return 0;
}
if(argc==3)
file=1;
else file=0;

if(!(fhIn=fopen(argv[1],"rt"))) {
printf(" can't open file %s for
reading\n",argv[1]);
return 0;
}
fscanf(fhIn,"%d\n",&N);
fscanf(fhIn,"%f\n",&Ciz);
fscanf(fhIn,"%d\n",&n1);
for(i=0;i<n1;++i)
fscanf(fhIn,"%f
%f\n",&Tst[0][i],&Co[0][i]);

fscanf(fhIn,"%f\n",&Kpr[0]);
/* // second var
fscanf(fhIn,"%d\n",&n2);
for(i=0;i<n2;++i)
fscanf(fhIn,"%f
%f\n",&Tst[1][i],&Co[1][i]);

fscanf(fhIn,"%f\n",&Kpr[1]);
*/

fscanf(fhIn,"%f\n%f\n",&alfa_t,&alfa_of);

fscanf(fhIn,"%f\n%f\n%f\n%f\n%f\n%f\n%f\n",&S,&Cp,&Dpz,&Rmp,&Rch,&Dgi,&Dop);
fclose(fhIn);
if(!file)
fhOut=stdout;
else

if(!(fhOut=fopen(argv[2],"wt"))) {
printf(" can't open file %s
for writing\n",argv[2]);
return 0;
}
fprintf(fhOut,"\n\n 󠠠
\n");

fprintf(fhOut,"________________________________________________________\n\n");
printf("\n :");
scanf("%*c");
calc_var(Tst[0],Co[0],Kpr[0],n1);
if(file)
fclose(fhOut);
return 0;
}
int
calc_var(float *Tst,float *Co,float Kpr,int n)
{
int i,j;
int arenda=0,credit=0,papers=0;
float
Npr,Npr2,Nim,Nb,Nb2,Nm,Nm2,Prp,Prp2,Da,Da2,Pno,Pno2;
float Fn;
int Ksm;
float Top[10],alfa,beta;
float Fop,Tp,tp;
float tau;
int
Ci[10];
int C;
int Ztt,Znzp;
int CHia,CHor;
int CHvr,CHa;
float Rzvr,Rzvr1,Rza,Rza1;
float Kof,Kos,Ku;
float Kob=0,Kp=0;
float Npz,Nnzp,Ngi,Nop;
float Asd;
float Rzor;
float Rar,Rar_ob,Rar_p,alfa_krl;
float Ks_of,Kar_ob,Kar_p;
float PsAs2;
float Kob_os,Kp_os;
float PsAs;
float Ef;
float alfa_rez;
float alfa_rez2;
float Sp;
float Sp2;
float Rvp,Rns,Rpr;
float Rvp2,Rns2,Rpr2;
float Rzd;
float alfa_raz;
float alfa_raz2;
float Vr,DS,Nds,Frez,Frez2,Fraz_p,Fraz_p2,Pr,Pr2;
float Spr,Spr2;
float Rnk;
float Ram;
float Rek;
float Rsn;
float Rkr,KR;
float Kus;
float Na;
float Ku_a;
float Krz;
float alfa_dv;
float alfa_dv2;
float Rprv;
org:
// 1
Fn=0;
Ksm=0;
#define
Tsm 480.
#define
D 260.
fprintf(fhOut,"\n 1.
.\n");
do {
printf("
(1-3):");
scanf("%d",&Ksm);
} while((Ksm<1)||(Ksm>3));

fprintf(fhOut,"%-60s%d\n","
:",Ksm);
Fn=Tsm*D*Ksm;

fprintf(fhOut,"%-60s%f\n","1.1
():",Fn);
alfa=beta=0;
do {
printf("alfa (2-3%):");
scanf("%f",&alfa);
} while((alfa<2.0)||(alfa>3.0));

fprintf(fhOut,"%-60s%f\n","
alfa:",alfa);
do {
printf("beta
(2.5-3.5%):");
scanf("%f",&beta);
} while((beta<2.5)||(beta>3.5));

fprintf(fhOut,"%-60s%f\n","
beta:",beta);
fprintf(fhOut,"1.2
:\n");
for(i=0;i<n;++i) {
Top[i]=Tst[i]/(1+(alfa+beta)/100);
fprintf(fhOut," %d - %f\n",i+1,Top[i]);
}
Fop=Tp=tp=0;
do {
printf("
(15-20 ):");
scanf("%f",&tp);
} while((tp<15.)||(tp>20.));

fprintf(fhOut,"%-60s%f\n","
:",tp);
Tp=Ksm*D*tp;
Fop=Fn-Tp;
fprintf(fhOut,"%-60s%f\n","1.3
():",Fop);
tau=Fop/N;

fprintf(fhOut,"%-60s%f\n","1.4
:",tau);
fprintf(fhOut,"1.5
:\n");
for(i=0;i<n;++i) {
// Ci[i]=(int)(Top[i]/tau+0.999);
Ci[i]=(int)(Top[i]/tau+0.5);
fprintf(fhOut," %d - %d\n",i+1,Ci[i]);
}
C=0;
for(i=0;i<n;++i)
C+=Ci[i];

fprintf(fhOut,"%-60s%d\n","1.6
:",C);
Ztt=2*C+1;

fprintf(fhOut,"%-60s%d\n","1.7 ,
. . :",Ztt);
Znzp=Ztt;

fprintf(fhOut,"%-60s%d\n"," , .
-:",Znzp);
CHia=Ksm*C;
CHor=(int)(1.1*CHia+0.999);

fprintf(fhOut,"%-60s%d\n\n\n","1.8
:",CHor);
printf("
-...");
getch();
printf("\n");
printf(" ?\n");
printf(" - 1
:");
switch(getch()) {
case '1': goto org;
}
structure:
// 2
fprintf(fhOut,"\n 2.
.\n");
fprintf(fhOut," .\n");
printf("\n
:");
scanf("%d",&CHa);

fprintf(fhOut,"%-60s%d\n","
:",CHa);

printf("
(../):");
scanf("%f",&Rza1);
Rza=12*CHa*Rza1;

fprintf(fhOut,"%-60s%f\n","/ .
(..):",Rza);
printf("
:");
scanf("%d",&CHvr);

fprintf(fhOut,"%-60s%d\n","
:",CHvr);
printf("
(../):");
scanf("%f",&Rzvr1);
Rzvr=12*CHvr*Rzvr1;

fprintf(fhOut,"%-60s%f\n\n\n","/
(..):",Rzvr);
// ? z/p > 4*min z/p
printf("
-...");
getch();
printf("\n");
printf(" ?\n");
printf(" -
1\n");
printf(" -
2 :");
switch(getch()) {
case '1': goto org;
case '2': goto structure;
}
// 3
fprintf(fhOut,"\n 3.
.\n");
ustcap:
// 3.1
fprintf(fhOut,"\n 3.1. .\n");
Kob=Kp=0;

fprintf(fhOut,"%-60s%f\n","3.1.2
:",Kpr);
for(i=0;i<n;++i)

Kob+=Ci[i]*Co[i]*(1+alfa_t/100)*alfa_of;

fprintf(fhOut,"%-60s%f\n","3.1.4
.. :",Kob);
Kp=(CHia/Ksm+CHor+CHvr+CHa)*S*Cp;

fprintf(fhOut,"%-60s%f\n","3.1.5
. . :",Kp);
Kof=Kob+Kp;

fprintf(fhOut,"%-60s%f\n","3.1.3
. :",Kof);
Asd=Rmp*N/260;
fprintf(fhOut,"%-60s%f\n","3.1.7
. (../) :",Asd);
Npz=Dpz*Asd/2;

fprintf(fhOut,"%-60s%f\n"," - :",Npz);
{ float t=0;
for(i=0;i<n;++i)
t+=Tst[i];
Rzor=Rch/60*t; // ? Ksm
}

fprintf(fhOut,"%-60s%f\n"," . /
:",Rzor);
#define
Knr 0.5
#define
Ks 0.55
Nnzp=(Rmp+Rzor)*Znzp*Knr;
fprintf(fhOut,"%-60s%f\n"," - -
:",Nnzp);
Ngi=Dgi*Ciz*Ks*N/260;

fprintf(fhOut,"%-60s%f\n"," - :",Ngi);
Nop=0;
fprintf(fhOut,"%-60s%f\n"," -
:",Nop);
Kos=Npz+Nnzp+Ngi+Nop;

fprintf(fhOut,"%-60s%f\n","3.1.6 .
- :",Kos);
Ku=Kpr+Kof+Kos;

fprintf(fhOut,"%-60s%f\n\n","3.1.1
:",Ku);
Rar=Rar_ob=Rar_p=alfa_krl=0;
arenda=0;
printf("\n
? (y/n):");
if(toupper(getche())=='Y') {
arenda=1;
#define
Na_ob 10.0
#define
Na_p 4.0
#define
alfa_kr 170.0
fprintf(fhOut,"\n3.1.8
.\n");

fprintf(fhOut,"%-60s%f\n"," _ %% :",Na_ob);

fprintf(fhOut,"%-60s%f\n"," _ %% :",Na_p);

fprintf(fhOut,"%-60s%f\n"," alfa_ %%
:",alfa_kr);
alfa_krl=0.3*alfa_kr;

fprintf(fhOut,"%-60s%f\n\n","
alfa_ %% :",alfa_krl);
l1:
do {
printf("\n
: %f\n",Kof);
printf("( - %f ,
- %f )\n",Kob,Kp);
printf("
? : ");
scanf("%f",&Ks_of);
}
while((Ks_of<0.)||(Ks_of>Kof));
do {
printf("
: %f\n",Kof-Ks_of);
printf("
(<=%f) ? (. - ) : ",Kob);
scanf("%f",&Kar_ob);
}
while((Kar_ob<0.)||(Kar_ob>(Kof-Ks_of))||(Kar_ob>Kob));
Kar_p=Kof-Ks_of-Kar_ob;
if(Kar_p>Kp) {
printf(":
> \n");
goto l1;
}

fprintf(fhOut,"%-60s%f\n"," :",Kof);

fprintf(fhOut,"%-60s%f\n"," . , . _
:",Ks_of);

fprintf(fhOut,"%-60s%f\n"," _ :",Kar_ob);

fprintf(fhOut,"%-60s%f\n"," _ :",Kar_p);

Rar_ob=((Na_ob+alfa_krl)/100)*Kar_ob;

fprintf(fhOut,"%-60s%f\n"," _
:",Rar_ob);
Rar_p=((Na_p+alfa_krl)/100)*Kar_p;

fprintf(fhOut,"%-60s%f\n"," _ :",Rar_p);
Rar=Rar_ob+Rar_p;

fprintf(fhOut,"%-60s%f\n"," :",Rar);
Ku=Kpr+Kos+Ks_of+Rar;

fprintf(fhOut,"%-60s%f\n\n"," :",Ku);
}
fprintf(fhOut,"\n");
printf("
-...");
getch();
printf("\n");
printf(" ?\n");
printf(" -
1\n");
printf(" -
2\n");
printf(" ࠠ - 3 :");
switch(getch()) {
case '1': goto org;
case '2': goto structure;
case '3': goto ustcap;
}
fromcap:
// 3.2
fprintf(fhOut,"\n 3.2.
.\n");
Na=Ku_a=0;
papers=0;
printf("\n ?
(y/n) :");
if(toupper(getche())=='Y') {
papers=1;
#define
Ca 1.0 // ..
fprintf(fhOut,"\n3.2.2
.\n");
do {
printf("\n :
%f\n",Ku);
printf("
? : ");
scanf("%f",&Ku_a);
} while((Ku_a<0.)||(Ku_a>Ku));

fprintf(fhOut,"%-60s%f\n"," . ,
:",Ku_a);

fprintf(fhOut,"%-60s%f\n"," (..):",Ca);
Na=Ku_a/Ca;

fprintf(fhOut,"%-60s%f\n\n"," :",Na);
}
printf("\n");
Rkr=KR=0;
credit=0;
printf(" ?
(y/n) :");
if(toupper(getche())=='Y') {
credit=1;
fprintf(fhOut,"\n3.2.6
.\n");
do {
printf("\n (
): %f\n",Ku-Ku_a);
printf(" ? :
");
scanf("%f",&KR);
}
while((KR<0.)||(KR>(Ku-Ku_a)));

fprintf(fhOut,"%-60s%f\n"," :",KR);
Rkr=alfa_kr*KR/100;
fprintf(fhOut,"%-60s%f\n","
:",Rkr);
Kus=Ku-KR;

fprintf(fhOut,"%-60s%f\n"," :",Kus);
}
printf("\n");
printf("
-...");
getch();
printf("\n\n");
// 3.3
fprintf(fhOut," 3.3. .\n");

fprintf(fhOut,"%-60s%f\n"," : ",Rmp);
switch (Ksm) {
case 1: Krz=1.;
break;
case 2: Krz=1.25;
break;
case 3: Krz=1.5;
break;
}
Rzor*=Krz; // ! (Rzor was set before)

fprintf(fhOut,"%-60s%f\n"," / :
",Rzor);
#define
alfa_d 18.0
#define
alfa_ss 5.4
#define
alfa_sv 28.0
#define
alfa_ms 3.6
#define
alfa_fz 2.0
#define
Smch 0.030 // ..
#define
alfa_nk 25.0
#define
alfa_vp 5.0
#define
alfa_ns 4.0
#define
alfa_pr 5.0
Rzd=Rzor*alfa_d/100;

fprintf(fhOut,"%-60s%f\n"," . / :
",Rzd);

Rsn=(Rzor+Rzd)*(alfa_ss+alfa_sv+alfa_ms+alfa_fz)/100;

fprintf(fhOut,"%-60s%f\n"," : ",Rsn);
{ float t=0;
for(i=0;i<n;++i)
t+=Top[i];
Rek=Smch/60*t;
}

fprintf(fhOut,"%-60s%f\n"," : ",Rek);
Ram=(Na_ob*Kob)/(100*(long)N)+(Na_p*Kp)/(100*(long)N);

fprintf(fhOut,"%-60s%f\n"," :
",Ram);
if(arenda)

fprintf(fhOut,"%-60s%f\n"," :
",Rar/N);
Rnk=0;

Rnk=Rzor*alfa_nk/100+(Rzvr+Rza)*/*(1+alfa_d/100)**/(1+(alfa_ss+alfa_sv+

+alfa_ms+alfa_fz)/100)/N;
//
not neccessary as Alla said

fprintf(fhOut,"%-60s%f\n"," : ",Rnk);
if(credit)

fprintf(fhOut,"%-60s%f\n"," : ",Rkr/N);

Spr=Rmp+Rzor+Rzd+Rsn+Rek+Ram+Rnk+(arenda?Rar/N:0.)+(credit?Rkr/N:0.);
Spr2=Rmp+Rzor+Rzd+Rsn+Rek+Ram+Rnk+(arenda?Rar/N:0.);

fprintf(fhOut,"%-60s%f\n"," : ",Spr);
if(credit)

fprintf(fhOut,"%-60s%f\n"," :
",Spr2);
Rvp=Spr*alfa_vp/100;
Rvp2=Spr2*alfa_vp/100;

fprintf(fhOut,"%-60s%f\n"," : ",Rvp);
if(credit)

fprintf(fhOut,"%-60s%f\n"," : ",Rvp2);
Rns=(Spr+Rvp)*alfa_ns/100;
Rns2=(Spr2+Rvp2)*alfa_ns/100;

fprintf(fhOut,"%-60s%f\n"," : ",Rns);
if(credit)

fprintf(fhOut,"%-60s%f\n"," : ",Rns2);
Rpr=(Spr+Rvp)*alfa_pr/100;
Rpr2=(Spr2+Rvp2)*alfa_pr/100;

fprintf(fhOut,"%-60s%f\n","
: ",Rpr);
if(credit)

fprintf(fhOut,"%-60s%f\n"," : ",Rpr2);
Sp=Spr+Rvp+Rns+Rpr;
Sp2=Spr2+Rvp2+Rns2+Rpr2;

fprintf(fhOut,"%-60s%f\n","
: ",Sp);
if(credit)

fprintf(fhOut,"%-60s%f\n"," : ",Sp2);
printf(" -...");
getch();
printf("\n");
printf(" ?\n");
printf(" -
1\n");
printf(" -
2\n");
printf(" ࠠ - 3\n");
printf(" -
4 :");
switch(getch()) {
case '1': goto org;
case '2': goto structure;
case '3': goto ustcap;
case '4': goto fromcap;
}
// 3.4
profit:
fprintf(fhOut,"\n 3.4.
.\n");

Vr=DS=Nds=Frez=Frez2=Fraz_p=Fraz_p2=Pr=Pr2=0;
Vr=Ciz*N;

fprintf(fhOut,"%-60s%f\n"," :",Vr);
DS=(Ciz-Rmp)*N;

fprintf(fhOut,"%-60s%f\n"," :",DS);
#define
alfa_nds 20.0
//#define
alfa_rez 15.0
#define
alfa_npr 32.0
#define
alfa_im 2.0
#define
alfa_mn 5.0
//#define
alfa_dv 30.0
Nds=DS*alfa_nds/100;

fprintf(fhOut,"%-60s%f\n"," :",Nds);
Pr=Vr-Sp*N-Nds;
Pr2=Vr-Sp2*N-Nds;

fprintf(fhOut,"%-60s%f\n"," :",Pr);
if(credit)

fprintf(fhOut,"%-60s%f\n"," :",Pr2);
if (credit) {
l30:
do {
printf("\n
? :");
scanf("%f",&alfa_rez);
}
while((alfa_rez<0.)||(alfa_rez>100.));
Frez=Ku*alfa_rez/100;

if((Frez)>(0.25*Ku)||(Frez)>(0.5*Pr)) {
printf(":
.\n");
goto l30;

}

fprintf(fhOut,"%-60s%f\n","
:",alfa_rez);

fprintf(fhOut,"%-60s%f\n"," :",Frez);
l31:
do {
printf("
(>15)? :");

scanf("%f",&alfa_rez2);
}
while((alfa_rez2<0.)||(alfa_rez2>100.));
Frez2=Ku*alfa_rez2/100; // maybe Kus
?

if((Frez2)>(0.25*Ku)||(Frez2)>(0.5*Pr2)) {
printf(": .\n");
goto l31;
}

fprintf(fhOut,"%-60s%f\n","
:",alfa_rez2);

fprintf(fhOut,"%-60s%f\n"," :",Frez2);
}
else {
l3:
do {
printf("\n
(>15)? :");

scanf("%f",&alfa_rez);
}
while((alfa_rez<0.)||(alfa_rez>100.));
Frez=Ku*alfa_rez/100;

if((Frez)>(0.25*Ku)||(Frez)>(0.5*Pr)) {
printf(":
.\n");
goto l3;
}

fprintf(fhOut,"%-60s%f\n","
:",alfa_rez);

fprintf(fhOut,"%-60s%f\n"," :",Frez);
}
if (credit) {
l20:
do {
printf("
? :");
scanf("%f",&alfa_raz);
}
while((alfa_raz<0.)||(alfa_raz>100.));
Fraz_p=Pr*alfa_raz/100;

if((Frez+Fraz_p)>(0.25*Ku)||(Frez+Fraz_p)>(0.5*Pr)) {
printf(":
.\n");
goto l20;
}

fprintf(fhOut,"%-60s%f\n","
:",alfa_raz);

fprintf(fhOut,"%-60s%f\n"," :",Fraz_p);
l21:
do {
printf("
? :");

scanf("%f",&alfa_raz2);
}
while((alfa_raz2<0.)||(alfa_raz2>100.));
Fraz_p2=Pr2*alfa_raz2/100;

if((Frez2+Fraz_p2)>(0.25*Ku)||(Frez2+Fraz_p2)>(0.5*Pr2)) {
printf(":
.\n");
goto l21;
}

fprintf(fhOut,"%-60s%f\n","
:",alfa_raz2);

fprintf(fhOut,"%-60s%f\n"," :",Fraz_p2);
}
else {
l2:
do {
printf("
? :");

scanf("%f",&alfa_raz);
} while((alfa_raz<0.)||(alfa_raz>100.));
Fraz_p=Pr*alfa_raz/100;

if((Frez+Fraz_p)>(0.25*Ku)||(Frez+Fraz_p)>(0.5*Pr)) {
printf(":
.\n");
goto l2;
}

fprintf(fhOut,"%-60s%f\n","
:",alfa_raz);

fprintf(fhOut,"%-60s%f\n"," :",Fraz_p);
}

Npr=Npr2=Nim=Nb=Nb2=Nm=Nm2=Prp=Prp2=Da=Da2=Pno=Pno2=0;
//
#define
min_sal 7.5

Rprv=(Rzvr+Rza+Rzor*N+Rzd*N)-4*12*min_sal*(CHa+CHvr+CHia);
//
Rprv=(Rzvr+Rza+8.2*22*CHia*Rch*1.18*12)-4*12*min_sal*(CHa+CHvr+CHia);

fprintf(fhOut,"%-60s%f\n"," :",Rprv);

Npr=(Pr-Frez-Fraz_p)*alfa_npr/100-((Rprv>0)?Rprv*0.5:0); // new!

Npr2=(Pr-Frez-Fraz_p2)*alfa_npr/100-((Rprv>0)?Rprv*0.5:0); // new!

fprintf(fhOut,"%-60s%f\n"," :",Npr);
if(credit)
fprintf(fhOut,"%-60s%f\n","
:",Npr2);
Nim=Ku*alfa_im/100;

fprintf(fhOut,"%-60s%f\n"," :",Nim);
Nb=Nds+Npr+Nim;
Nb2=Nds+Npr2+Nim;
fprintf(fhOut,"%-60s%f\n"," :",Nb);
if(credit)

fprintf(fhOut,"%-60s%f\n"," :",Nb2);
Nm=(Pr-Frez-Fraz_p)*alfa_mn/100;
Nm2=(Pr2-Frez-Fraz_p2)*alfa_mn/100;
fprintf(fhOut,"%-60s%f\n"," :",Nm);
if(credit)

fprintf(fhOut,"%-60s%f\n"," :",Nm2);
if(credit) {

fprintf(fhOut,"%-60s%f\n"," ( ):",KR);
}
Prp=Pr-Npr-Nim-Nm-(credit?KR:0);
Prp2=Pr2-Npr2-Nim-Nm2;

fprintf(fhOut,"%-60s%f\n"," , . :",Prp);
if(credit)

fprintf(fhOut,"%-60s%f\n"," , .
. :",Prp2);
alfa_dv=alfa_dv2=0;
if(papers) {
if(credit) {
do {
printf("
? :");

scanf("%f",&alfa_dv);
} while
((alfa_dv<0.)||(alfa_dv>1000.0));
Da=Na*Ca*alfa_dv/100;

fprintf(fhOut,"%-60s%f\n"," , :",alfa_dv);

fprintf(fhOut,"%-60s%f\n"," :",Da);
do {
printf("
(>30%)? :");

scanf("%f",&alfa_dv2);

} while ((alfa_dv2<0.)||(alfa_dv2>1000.0));

Da2=Na*Ca*alfa_dv2/100;

fprintf(fhOut,"%-60s%f\n"," ,
:",alfa_dv2);

fprintf(fhOut,"%-60s%f\n"," :",Da2);

fprintf(fhOut,"%-60s%f\n","
:",(alfa_dv+4*alfa_dv2)/5);
}

else {

do {

printf(" (>30%)? :");

scanf("%f",&alfa_dv);

} while ((alfa_dv<0.)||(alfa_dv>1000.0));

Da=Na*Ca*alfa_dv/100;

fprintf(fhOut,"%-60s%f\n"," , :",alfa_dv);

fprintf(fhOut,"%-60s%f\n"," :",Da);
}
}
Pno=Prp-Frez-Fraz_p-(papers?Da:0);
Pno2=Prp2-Frez-Fraz_p2-(papers?Da2:0);
fprintf(fhOut,"%-60s%f\n\n","
:",Pno);
if(credit)

fprintf(fhOut,"%-60s%f\n\n","
:",Pno2);
printf(" -...");
getch();
printf("\n");
printf(" ?\n");
printf(" - 1\n");
printf(" - 2\n");
printf(" ࠠ - 3\n");
printf(" - 4\n");
printf(" 蠠 - 5
:");
switch(getch()) {

case '1': goto org;

case '2': goto structure;

case '3': goto ustcap;

case '4': goto fromcap;

case '5': goto profit;
}
// 3.5
fprintf(fhOut,"\n 3.5. .\n");
#define
T 5
#define
En 1.7
fprintf(fhOut,"%-60s%f\n"," :",
pow(1+En,-T));
if(!credit) {
Kob_os=Kob*(1-Na_ob*T/100);
fprintf(fhOut,"%-60s%f\n","
:", Kob_os);
Kp_os=Kp*(1-Na_p*T/100);
fprintf(fhOut,"%-60s%f\n"," :",
Kp_os);
PsAs=(Prp+Ram*N)*(pow(1+En,T)-1)/(En*pow(1+En,T));
fprintf(fhOut,"%-60s%f\n"," .
:",PsAs);
Ef=PsAs+(Kob_os+Kp_os)/pow(1+En,T)-Ku;
fprintf(fhOut,"%-60s%f\n"," :",Ef);
}
else {
Kob_os=Kob*(1-Na_ob*T/100);

fprintf(fhOut,"%-60s%f\n"," :", Kob_os);
Kp_os=Kp*(1-Na_p*T/100);
fprintf(fhOut,"%-60s%f\n"," :",
Kp_os);
PsAs=(Prp+Ram*N)/(1+En);

fprintf(fhOut,"%-60s%f\n"," . :",PsAs);
{ float t=0;
for(i=2;i<=T;++i)
t+=1/pow(1+En,i);
PsAs2=(Prp2+Ram*N)*t;
}

fprintf(fhOut,"%-60s%f\n"," . :",PsAs2);

Ef=PsAs+PsAs2+(Kob_os+Kp_os)/pow(1+En,T)-Kus;

fprintf(fhOut,"%-60s%f\n"," :",Ef);
}

fprintf(fhOut,"%-60s\n\n"," ...");
printf("
-...");
getch();
printf("\n");
printf(" ?\n");
printf(" -
1\n");
printf(" -
2\n");
printf(" ࠠ - 3\n");
printf(" -
4\n");
printf(" 蠠 - 5 :");
switch(getch()) {
case '1': goto org;
case '2': goto structure;
case '3': goto ustcap;
case '4': goto fromcap;
case '5': goto profit;
}
printf("\n");
return 0;
}
. . . . . . . . . . . . . . .

      ©2010