//------------- ࠢ  । . -----------------
#(N,5,0)=_(0);      // ᫮ ᥩ  ⠡
$(_EQ())
  $
$_
//${(1. ਧ  )
//&FlInfoP(N,2,0)=1; // 1 -  ଠ  ।⨨, 0 - 
//&FKop(N,2,0)=1;    // 1 -   ⤥쭮, 0 - 
//&FPRk(N,2,0)=0;    // 1 -  / ⤥쭮, 0 - 
// ,  ᪮, ᠭ ᫥⥫쭮 ᨬ, 
// 㤥    祭.
#(C,81,0)=R_String(____________________________________________________________________);
//$}(1. ਧ  )
&(N,5,0)=0; &ITS(N,7,0)=0;&ITS1(N,4,0)=0;&ITS2(N,4,0)=0;&ITS3(N,4,0)=0;&S50(N,4,0)=0;
&SD(N,7,2)=0;&SM(N,10,2)=0;
#(N,2,0)=_(FCf);    #(N,2,0)=_(FCi);
#(N,2,0)=_(FCo);    #(N,2,0)=_(C_FIO);
#(N,2,0)=_(FCdata_rb); #(N,2,0)=_(FCdata_uv);
#(N,2,0)=_(FCstrah_n); #(N,2,0)=_(FCdolgnost);
#(N,2,0)=_(SrZarplata); #MTEK(N,4,0)=(0);
  #(C,121,0)=_(!SPACE,);
  #=_(,80);
  &I(V,2,0)=0; #01(C,80,0)=_(0); #02(C,80,0)=R_String();
  $(_GT(-1))
    #02=_(1);
  $_
&Name(N,2,0)=;
  #=_();
  #03(C,80,0)=_(!SPACE,);
  // &J(V,2,0)=15;
$                                      //     ⠡
    #=_();                     // ਧ  
    #(N,9,0)=_(,);
    $(*)
#04(C,41,0)=_(,);  #05(C,41,0)=_(,);
#06(C,41,0)=_(,);  #(C,15,0)=_(,);
#(C,40,0)=_(,);
#(C,10,0)=_(,); #(C,20,0)=_();
#=_();
         $(_EQ())
            #(C,30,0)=R_String("__"_._._._._._._._.200__ );
         $_
#(C,10,0)=_(,); #(C,20,0)=_();
#PRUV(C,30,0)=_(FCpruv,);
#PRIK(C,35,0)=_(FCprikaz,);
#=_();
         $(_EQ())
            #(C,30,0)=R_String("__"_._._._._._._._.200__ );
         $_
#(C,20,0)=(61);
#(C,100,0)=_(!SPACE,04, ,05, ,06);
#_(C,100,0)=_(,3,POL);
${(2. ଠ )


//   $ (_EQ(FlInfoP))
// ( 㪠  ।                 ᫥ । ࠡ⪠,
//  ⥫䮭 㪮⥫)                       ⢥ত ⠭
//                                          㤠  樠쭮 ࠧ 
 //                                                          N-1  16.01.98 .
//$
  #Adr(C,121,0)=(,,,,);
  #=_(Adr,40);
  #A01(C,40,0)=_(0); #A02(C,40,0)=R_String();
  $(_GT(-1))
    #A02=_(1);
  $_
      ⠬                               室騩  㬥 ___
      ࣠樨                                 "__" __________ 20__ 
                                                  ।
                                                 @Adr
                                                  @
                                                  @



//$_

                                             
    । ࠡ⪥ (室,  ⢨)  । ࠧ ᮡ
  ࠡ  ⨯  ਮ ᨮ쭮 ⮢, ९⮢ 
                 襭 䨪樨  ࠢ 㦡 

뤠 @_
 ⮬,  () ࠡ⠫(), 室() 㦡
  @01
$(_GT(Name-1))
   @02
$_
 @                       @                ,         ⮬ ᫥
 ᫮  ࠡ祣 ()
 @                       @                .
()  ._________ .__________  , ᭮:_______________________________
   ()  ࠡ⮪ ( ⢨)   ᫥ ࠡ⠭ ,
।  㢮쭥 (᫨ ਮ ࠡ ⠢ 3   楢,
㪠뢠 ᫥   ) ⠢:
 ________________________________________________________________________________________
|.| ,   |㬬  /|- ࠡ⠭|ਮ,᪫祭        |
|    |             |   ()   | ࠡ     |। ࠡ⪠(। ,  |
|    |             |           |_________________|/,⮩,  ࠭/)|
|    |             |           | ଠ   |   |-  |      稭            |
_________________________________________________________________________________________
$                             //     ⠡
$ (_GT(-))
 #=_();                // ਧ  
$()                            //   ப ⠡
#CMES(C,7,0)=_(Month,);#CM(C,8,0)=(1,CMES);#CM1(C,4,0)=(2,CMES);
#R(N,4,0)=_(Order,);
#S1(N,7,0)=_(S_Col_17,);
#S2(N,3,0)=_(S100,); // ଠ
#S3(N,3,0)=_(S1,); //ࠡ祥 ६
&S50=S2-S3;
|@R  |@CM      @CM1|@S1        |@S2      |@S3    |@S50        |                         |
_________________________________________________________________________________________
&ITS=ITS+S1;
&ITS1=ITS1+S2;
&ITS2=ITS2+S3;
&ITS3=ITS3+S50;
&S50=0;
$_
  $_
  &=+1;
$_
#(N,5,0)=_();         // 稪 ப  
$(_GE(+6-)+_EQ(-))
// $
// $_
$_
$(_GT(-+1))
| ᥣ            |@ITS       |@ITS1    |@ITS2  |@ITS3       |                         |
_________________________________________________________________________________________
  &SD=ITS/ITS2;
  &SM=SD*ITS1/;
#QSD(C,73,0)=_(SD,1);
#PSD(C,75,0)=_((,1,1,QSD,1,73,),1,1,1);
। ࠡ⮪ ⠢ @SD    @PSD
 #QSM(C,73,0)=_(SM,1);
#PSM(C,75,0)=_((,1,1,QSM,1,73,),1,1,1);
। ࠡ⮪ ⠢ @SM       
@PSM
ࠢ 뤠  ᭮ 楢 .
᫨ ࠡ⮪    祭 ᫥ 楢, 㪠 ਮ  稭
(/,⮩,  ..):
1.  ____________  ______________  裡  ___________________________
2.  ____________  ______________  裡  ___________________________
  ८࣠樨 ( ) । ᫥ 㢮쭥 ࠦ
㪠   襤 :
__________________________________________________________________________________________
__________________________________________________________________________________________

..
                              㪮⥫ _____________ /@            /

                               壠_________ /@            /

                              ᯮ⥫  _____________ /䥥 ../

ࠢ 뤠 @            .

                                           ⥫䮭 @


ਬ砭: ࠢ ஢ ⤥  졥  ᪨ 㯫ﬨ ,
  㦡.
//!    ࠢ,  㣫 ⠬ 
// 㪠 ਤ᪮   ⢨⥫쭠.
       $_
$}(2. ଠ )
    $_
    &=+1;
$(_GT(-))
$



