//------------------------------------------------------- 
#(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡ 
$(_EQ()) 
  $ 
$_ 
${(5. ⥫ ப ᯨ᪠) 
  $(__,0);  // 0 (1,...) - ⢮ ய᪮ ப 
  $(_,"-");      // ᨬ  મ: "-" ( .ᨬ) 
$}(5. ⥫ ப ᯨ᪠) 
${(6. ⥫ ⮫殢 ᯨ᪠) 
  $(__,1); // 1,2,...-᫮ ᨬ  ࠧ  
  $(_,"|");     // ᨬ-ࠧ⥫  (|  ||  ..) 
$}(6. ⥫ ⮫殢 ᯨ᪠) 
${(7. ਧ  ) 
  $(_," "); // " " (஡) -   㫨, "0" -  
$}(7. ਧ  ) 
${(1.  ᯨ᪠) 
//
#ITS(N,12,2)=0;
#(N,3,0)=0;
#ITS1(N,12,2)=0;
#ITS2(N,12,2)=0;
$
//${(ப )
#=_();
$();
#S(N,12,2)=_(6,);
&ITS=ITS+S;
#S1(N,12,2)=_(7,);
&ITS1=ITS1+S1;
#S2(N,12,2)=_(9,);
#F1(C,50,0)=_(2,);
#M(C,40,0)=_(3,);
#R(C,10,0)=_(4,);
&ITS2=ITS2+S2;
$_
//$}(ப )
&=+1;
#DAT(C,10,0)=(6);
$(_GT(-))
//1(C,25,0)=_(1,);
//2(C,20,0)=_(2,);
//3(C,20,0)=_(3,);
//   ⨬ ਥ 室 ⥪  ᯨ᪠
 㭨樯쭮 ०        _____________________________
ࠫ 壠        (ਠ ࣠
.㧭檠  ࠫ쭮 -      ____________________________
⥫.74-09-51                             樠쭮  ᥫ)

                              ___
                 ᫥ ।襢 室
       饣 ࠢ  祭 筮 ᮡ  ॡ.

     @F1                                                      ,
 ஦ @R           ,ࠡ饩 
@M
 ⮬,   ਮ  " 1 "         2004  31"           2004.
㬬,᫥ ࠡ⭮ ( ࠦ,ᮤ-
), ⢨    ᮮ⢥⢨  -
⢮    易⥫ ⥦ ⠢:
#QSUM(C,73,0)=_(ITS,1);
#PSUM(C,75,0)=_((,1,1,QSUM,1,73,),1,1,1);
@PSUM
___________________________________________________________________
    ᪨  㪠 ਮ 믫祭 㬬:
#Q1(C,73,0)=_(ITS1,1);
#P1(C,75,0)=_((,1,1,Q1,1,73,),1,1,1);
@P1
___________________________________________________________________
 ᫥   易⥫ 客 ⥦  㬬:
#Q2(C,73,0)=_(ITS2,1);
#P2(C,75,0)=_((,1,1,Q2,1,73,),1,1,1);
@P2
 ⮬ ᫥  栬:
$}(1.  ᯨ᪠) 
//${(砫 㬬) 
  #=_(_);     //  砫 㬬 
//$}(砫 㬬) 
&(N,5,0)=0; 
&(N,5,0)=1;                                 // 稪 ࠭ 
#(N,3,0)=_();                      //  ࠭ 
//${( ⠡) 
  #=_(,,)             //   
  #=_(__);                 //  㬬   
//$}( ⠡) 
$                                             //     ⠡ 
  //${(ப ) 
    #=_();                         // ਧ   
    $() 
      #=_(_,,)  //   ப ⠡ 
    $_ 
  //$}(ப ) 
  &=+1; 
  #(N,5,0)=_();                 // 稪 ப   
  $(_GE(+6-)+_EQ(-)) 
    //${(⮣ ) 
      #=_(,_);            //  ⮣  . 
      #=_(__);            //  ⮣  . 
    //$}(⮣ ) 
    ${(3.  ) 
 
//   ⨬ ਥ 室 ⥪    
ਬ砭:   5 㪠뢠 㬬   易⥫ - 
⥦, 㤥ঠ  㬬 䠪᪨ 믫祭 ࠡ⭮  
( ࠦ,ᮤঠ, ⢨) (3) 
 ਮ,㪠   4. ⮬, ᢮६ ᫥ 
, ।ᬮ७ ⥫⢮ ,  㪠 ਮ 
뢠. 
    뤠  @DAT 
 
   㪮⥫ ० ______________  ..뭥 
 
    壠       _____________   ..㫪 
 
   ..壠       _____________   .. 
 
       .. 
 
 
 
 
 
    $}(3.  ) 
    $(_LT(-)) 
      $_ 
      ${(2.  ) 
//   ⨬ ਥ 室 ⥪   
      $}(2.  ) 
      //${( ⠡).   . 
        #=_(,,)             //   
        #=_(__);                 //  㬬 
      //$}( ⠡).   . 
    $_ 
  $_ 
$(_GT(-)) 
//${(⮣ ) 
//  #=_(_) 
//$}(⮣ ) 
${(4.  ᯨ᪠) 
//   ⨬ ਥ 室 ⥪   ᯨ᪠ 
 
$}(4.  ᯨ᪠) 
$LF