//----------------- -----------------  
#(N,5,0)=_(0); // ᫮ ࠡ ᥩ  ⠡  
$(_EQ())  
  $  
$_  
${(6. ਧ  )  
  $(_,"0"); // " " (஡) -   㫨, "0" -   
$}(6. ਧ  )  
//${(7. ਧ  )  
  #_(N,1,0)=__();  
  //&(N,1,0)=1; //1-  , 0- 䠬  樠  
//$}(7. ਧ  )  
&(N,5,0)=1;                                 // 稪 ࠭  
#(N,3,0)=_();                      //  ࠭  
//&(N,3,0)=19;                      //  ࠭  
#(N,3,0)=(8); #(N,4,0)=(9);  
#(C,8,0)=_();  
${(1.  )  
                                 ᫥ ଠ  -53
                                ⢥ত ⠭ ᪮ ᨨ
                                 30.10.97  71
                                                                 
                                                           -----------------
                                             ଠ   |    0301011    |
                                                           |---------------|
                                           ⠢ |    |    |     |
                                                           |---------------|
#(N,8,0)=_(,37);   // 颥 ᫮ ப
$(_GT())
  &(N,8,0)=0;
  #(C,37,0)=_();
$
  #(C,37,0)=R_String(.....................................);
$_
 ࣠ @................................   |               |
                                                           |---------------|
#=_();
#(N,8,0)=_(1);
$(_GT())
  #(C,31,0)=_(@   );
$
  #(C,31,0)=R_String(...............................);
$_
 ୮ ࠧ @....................... |               |
                                                           |---------------|
                                    ᯮ騩  |               |
                                                           |---------------|
                                    楫 祭 |               |
                                                           |---------------|
                                               樨 |               |
                                                           -----------------
#(N,3,0)=_(SU_);        //  ⮫  㬬  
#(N,15,2)=_(,0);   // 㬬  
      ப
  .............  .............. 19.. .
$(_GT())
  #(C,160,0)=_();
  #(N,8,0)=_(,66);   // 颥 ᫮ ப
  &(N,8,0)=0;
  $
    #(N,66,0)=_();
 @........................................................
      &=+1;
    $(_LT(-))
    #=_();
$
 ..................................................................
 ..................................................................
$_
&(N,15,0)=_Long(); &(N,4,0)=(-)*100;
#(,15,0)=DIVIDER_INSERT();
 (@            @ )

#(C,25,0)=R_String();
 @                   ............ @

#(C,25,0)=R_String();
 @                ............ @

 "....".............. 19.. .


#(N,8,0)=_(9);
$()
                        @
$
                        ........
$_
#(C,10,0)=_(5);
#(C,18,0)=_();
#=_();
$()
                      @            .
$
                     "....".............. 19.. .
$_
#(N,6,0)=_();                   // 稪 ப  
$

  #=_();
$(_GT(-))
$_
&=+1;
$}(1.  )  
  
${(2.  ⠡)  
                                                                   @  
$(_)  
----------------------------------------------------------------------------  
   | . |                                        |               |ᯨ᪠  
  | |        , , ⢮          |     㬬     | -  
   |      |                                        |               |祭  
---|------|----------------------------------------|---------------|--------  
 1 |  2   |                  3                     |       4       |   5  
----------------------------------------------------------------------------  
$  
----------------------------------------------------------------------------  
|   | . |                               |               |ᯨ᪠|ਬ-|  
|  | |    , , ⢮     |     㬬     | - |砭 |  
|   |      |                               |               |祭   |      |  
|---|------|-------------------------------|---------------|--------|------|  
| 1 |  2   |              3                |       4       |   5    |  6   |  
----------------------------------------------------------------------------  
$_  
  &(N,15,2)=0;  
$}(2.  ⠡)  
${(3.    ⠡)  
&(N,6,0)=0;  
$                                        //     ⠡  
  #=_();                         // ਧ    
  $()  
    &(N,3,0)=+1;  
    #(N,3,0)=_(C_FIO);  
    #(N,6,0)=_(,);  
    &(N,6,0)=;  
    $(_)  
      #=_(,1);  
      #(,40,0)=R_Name(1);  
    $  
      #(N,3,0)=_(FIO);  
      #(,31,0)=_(,);  
    $_  
    #(N,3,0)=_(SU_);  
    #(N,15,2)=_(,);  
    #(C,15,2)=DIVIDER_INSERT();  
    &=+;  
    $(_)  
@|@   |@                                    |@          |              |  
----------------------------------------------------------------------------  
    $  
|@|@   |@                           |@          |        |      |  
----------------------------------------------------------------------------  
    $_  
  $_  
  &=+1;  
  #(N,6,0)=_();                   // 稪 ப    
  $(_GT(+4-)+_EQ(-))  
    #(C,15,2)=DIVIDER_INSERT();  
    $(_)  
 ⮣  :                                    @  
    $  
 ⮣  :                            @  
    $_  
    &=0;  
    $(_LT(-))  
      $_  
      &=+1;  
                                                                   @  
      $(_)  
----------------------------------------------------------------------------  
   | . |                                        |               |ᯨ᪠  
  | |        , , ⢮          |     㬬     | -  
   |      |                                        |               |祭  
---|------|----------------------------------------|---------------|--------  
 1 |  2   |                  3                     |       4       |   5  
----------------------------------------------------------------------------  
      $  
----------------------------------------------------------------------------  
|   | . |                               |               |ᯨ᪠|ਬ-|  
|  | |    , , ⢮     |     㬬     | - |砭 |  
|   |      |                               |               |祭   |      |  
|---|------|-------------------------------|---------------|--------|------|  
| 1 |  2   |              3                |       4       |   5    |  6   |  
----------------------------------------------------------------------------  
      $_  
    $_  
  $_  
$(_GT(-))  
$}(3.    ⠡)  
${(4. ⮣ )  
  #(C,15,2)=DIVIDER_INSERT();  
  $(_)  
 ⮣:                                             @  
  $  
 ⮣:                                     @  
  $_  
                                              ⢮ ⮢ @  
$}(4. ⮣ )  
${(5.  )  
  饩  ⥦   
 믫祭  㡫......................................................  
 ..................................................(.............)  
  ஢ 㡫..................................................  
 ..................................................(.............)  
  
 믫 ந   .............   ............   .................  
  
 ஢ਫ 壠 .............   ...............  
  
 "...."............. 19.. .  
$}(5.  )  
$  
  
  #=_();  
$(_GT(-))  
$_  
$