[оюпюлерпш]
ярпюунбюъ_опелхъ=0
сыепа_гднпнбэч=51000.00
сыепа_хлсыеярбс=25500.00
тпюмьхгю=510.00
бхд_днцнбнпю=0
рхо_днцнбнпю=3
ярюрся=1
япнй_днцнбнпю=12
пецпеяямше_хяйх=0
йкюяя_бндхрекъ=3
йнд_едпонс=""
ярюф_бндхрекъ1=0
ярюф_бндхрекъ2=0
ярюф_бндхрекъ3=0
ярюф_бндхрекъ4=0
ярюф_бндхрекъ5=0
рхо_юбрн=1
рхо_юбрн_1=0
рхо_юбрн_2=0
рхо_юбрн_3=0
рхо_юбрн_4=0
рхо_юбрн_5=0
рхо_юбрн_6=0
гнмю_пецхярпюжхх=1
й1=0.71
й2=1.5
й3=1.0
й4=1.2
й5=1.0
й6=1.0
й7=1.0
анмся_люкся=1.0
мюкхвхе_кэцнр=0
яйхдйю=0
рейсыхи_цнд=0

[хмрепбюкш]
й2_лхм=1.5
й2_люйя=1.8
й3_лхм=1.0
й3_люйя=1.0
й4_лхм=1.2
й4_люйя=1.5
й5_лхм=1.0
й5_люйя=1.0

[оепелеммше]
аюгю=291.49
аюгю_кэцнрш=0.5
йнщт_кэцнр=1
йнщт_яйхдйх=1

[пюявхрюрэ]
  й_лхм:= 0.5*й1;
  й_япед:= й2*й3*й4;
  й_люйя:= 3*й1;

  еякх (аюгю<=0) рнцдю {аюгю:=291.49;}
  еякх (йнщт_яйхдйх<=0) рнцдю {йнщт_яйхдйх:=1;}
  еякх (йнщт_кэцнр<=0) рнцдю {йнщт_кэцнр:=1;}
  еякх (й1<=0) рнцдю { еякх (рхо_днцнбнпю<>2) рнцдю {й1:=0.71;}}
  еякх (й2<=0) рнцдю {й2:=1.5;}
  еякх (й3<=0) рнцдю {й3:=1.0;}
  еякх (й4<=0) рнцдю {й4:=1.2;}
  еякх (й5<=0) рнцдю {й5:=1.0;}
  еякх (й6<=0) рнцдю {й6:=1.0;}
  еякх (й7<=0) рнцдю {й7:=1.0;}
  еякх (анмся_люкся<=0) рнцдю {анмся_люкся:=1.0;}
  еякх (ярюрся=3) рнцдю {мюкхвхе_кэцнр:=1; йнщт_кэцнр:=0.5;} хмюве {мюкхвхе_кэцнр:=0; йнщт_кэцнр:=1;}

  еякх (й_лхм <= й_япед) AND (й_япед <= й_люйя) рнцдю {
    ярпюунбюъ_опелхъ:= аюгю*йнщт_кэцнр*й1*й2*й3*й4*й5*й6*й7*анмся_люкся*йнщт_яйхдйх }
  хмюве {
    еякх (й_япед > й_люйя ) рнцдю {
      ярпюунбюъ_опелхъ:= аюгю*йнщт_кэцнр*й1*3*й1*й5*й6*й7*анмся_люкся*йнщт_яйхдйх }
    хмюве {
      ярпюунбюъ_опелхъ:= аюгю*йнщт_кэцнр*й1*0.5*й1*й5*й6*й7*анмся_люкся*йнщт_яйхдйх }
  }

[рхош_днцнбнпнб]
  еякх (рхо_днцнбнпю=1) рнцдю {
    еякх (ярюрся=3) рнцдю {
      ярюрся:=1;
      йнщт_кэцнр:=1;  
      мюкхвхе_кэцнр:=0;
    }
  }
  еякх (рхо_днцнбнпю=2) рнцдю {
    яйхдйю:=0;
    йнщт_яйхдйх:=1;
    еякх (ярюрся<>1) рнцдю { 
      ярюрся:=1;
      йнщт_кэцнр:=1;  
      мюкхвхе_кэцнр:=0;
    }
  }
  еякх (ярюрся=3) рнцдю {
    йнщт_кэцнр:=0.5; 
    мюкхвхе_кэцнр:=1; 
    рхо_днцнбнпю:=3;
  }

[ярюрся_ярпюунбыхйю]
  еякх (ярюрся=1) рнцдю { 
    йнщт_кэцнр:=1;  
    мюкхвхе_кэцнр:=0;
  }
  еякх (ярюрся=2) рнцдю { 
    йнщт_кэцнр:=1;  
    мюкхвхе_кэцнр:=0;
    еякх (рхо_днцнбнпю=2) рнцдю {рхо_днцнбнпю:=1;}
  }
  еякх (ярюрся=3) рнцдю { 
    йнщт_кэцнр:=0.5; 
    мюкхвхе_кэцнр:=1; 
    рхо_днцнбнпю:= 3;
  }

[бхдш_онкхянб]
  еякх (бхд_днцнбнпю=0) рнцдю {
    сыепа_гднпнбэч:=51000.00;
    сыепа_хлсыеярбс:=25500.00;
    тпюмьхгю:=510.00;
  }
  еякх (бхд_днцнбнпю=1) рнцдю {
    сыепа_гднпнбэч:=51000.00;
    сыепа_хлсыеярбс:=35000.00;
    тпюмьхгю:=0.00;
    япнй_днцнбнпю:= 12;
  }

[пюявер_яйхдйх]
  йнщт_яйхдйх:= (100-яйхдйю)/100;

[пюявер_й1]
  еякх (рхо_днцнбнпю = 1) рнцдю {
    еякх (рхо_юбрн = 1) рнцдю { й1:= 0.71 }
    еякх (рхо_юбрн = 2) рнцдю { й1:= 0.94 }
    еякх (рхо_юбрн = 3) рнцдю { й1:= 1.39 }
    еякх (рхо_юбрн = 4) рнцдю { й1:= 1.41 }
    еякх (рхо_юбрн = 5) рнцдю { й1:= 0.27 }
    еякх (рхо_юбрн = 6) рнцдю { й1:= 3.04 }
    еякх (рхо_юбрн = 7) рнцдю { й1:= 3.58 }
    еякх (рхо_юбрн = 8) рнцдю { й1:= 1.68 }
    еякх (рхо_юбрн = 9) рнцдю { й1:= 1.86 }
    еякх (рхо_юбрн = 10) рнцдю { й1:= 0.57 }
    еякх (рхо_юбрн = 11) рнцдю { й1:= 0.27 }
    еякх (рхо_юбрн = 12) рнцдю { й1:= 0.54 }
  }
  еякх (рхо_днцнбнпю = 2) рнцдю {
    й1:=0;
    еякх (рхо_юбрн_1 = 11) рнцдю { еякх (й1 < 0.54) рнцдю { й1:= 0.54 }}
    еякх (рхо_юбрн_2 = 1) рнцдю { еякх (й1 < 1.41) рнцдю { й1:= 1.41 }}
    еякх (рхо_юбрн_3 = 8) рнцдю { еякх (й1 < 1.86) рнцдю { й1:= 1.86 }}
    еякх (рхо_юбрн_4 = 6) рнцдю { еякх (й1 < 3.58) рнцдю { й1:= 3.58 }}
    еякх (рхо_юбрн_5 = 10) рнцдю { еякх (й1 < 0.57) рнцдю { й1:= 0.57 }}
    еякх (рхо_юбрн_6 = 5) рнцдю { еякх (й1 < 0.27) рнцдю { й1:= 0.27 }}
  }
  еякх (рхо_днцнбнпю = 3) рнцдю {
    еякх (рхо_юбрн = 1) рнцдю { й1:= 0.71 }
    еякх (рхо_юбрн = 2) рнцдю { й1:= 0.94 }
    еякх (рхо_юбрн = 3) рнцдю { й1:= 1.39 }
    еякх (рхо_юбрн = 4) рнцдю { й1:= 1.41 }
    еякх (рхо_юбрн = 5) рнцдю { й1:= 0.27 }
    еякх (рхо_юбрн = 6) рнцдю { й1:= 3.04 }
    еякх (рхо_юбрн = 7) рнцдю { й1:= 3.58 }
    еякх (рхо_юбрн = 8) рнцдю { й1:= 1.68 }
    еякх (рхо_юбрн = 9) рнцдю { й1:= 1.86 }
    еякх (рхо_юбрн = 10) рнцдю { й1:= 0.57 }
    еякх (рхо_юбрн = 11) рнцдю { й1:= 0.27 }
    еякх (рхо_юбрн = 12) рнцдю { й1:= 0.54 }
  }

[пюявер_й2]
  еякх (рхо_днцнбнпю = 1) рнцдю {
    еякх (гнмю_пецхярпюжхх = 1) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 2) рнцдю { й2_лхм:= 1.2; й2_люйя:= 1.5; }
    еякх (гнмю_пецхярпюжхх = 3) рнцдю { й2_лхм:= 1.0; й2_люйя:= 1.2; }
    еякх (гнмю_пецхярпюжхх = 4) рнцдю { й2_лхм:= 0.8; й2_люйя:= 1.0; }
    еякх (гнмю_пецхярпюжхх = 5) рнцдю { й2_лхм:= 0.5; й2_люйя:= 0.8; }
  }
  еякх (рхо_днцнбнпю = 2) рнцдю {
    еякх (гнмю_пецхярпюжхх = 1) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 2) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 3) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 4) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 5) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
  }
  еякх (рхо_днцнбнпю = 3) рнцдю {
    еякх (гнмю_пецхярпюжхх = 1) рнцдю { й2_лхм:= 1.5; й2_люйя:= 1.8; }
    еякх (гнмю_пецхярпюжхх = 2) рнцдю { й2_лхм:= 1.2; й2_люйя:= 1.5; }
    еякх (гнмю_пецхярпюжхх = 3) рнцдю { й2_лхм:= 1.0; й2_люйя:= 1.2; }
    еякх (гнмю_пецхярпюжхх = 4) рнцдю { й2_лхм:= 0.8; й2_люйя:= 1.0; }
    еякх (гнмю_пецхярпюжхх = 5) рнцдю { й2_лхм:= 0.5; й2_люйя:= 0.8; }
  }

[пюявер_й3]
  еякх (рхо_днцнбнпю = 1) рнцдю {
    еякх йнд_едпонс = "" рнцдю { й3_лхм:= 1.0; й3_люйя:= 1.0; }
    хмюве { й3_лхм:= 1.1; й3_люйя:= 1.2; }
  }
  еякх (рхо_днцнбнпю = 2) рнцдю {
    еякх йнд_едпонс = "" рнцдю { й3_лхм:= 1.1; й3_люйя:= 1.2; }
    хмюве { й3_лхм:= 1.0; й3_люйя:= 1.0; }
  }
  еякх (рхо_днцнбнпю = 3) рнцдю {
    еякх йнд_едпонс = "" рнцдю { й3_лхм:= 1.0; й3_люйя:= 1.0; }
    хмюве { й3_лхм:= 1.1; й3_люйя:= 1.2; }
  }

[пюявер_й4]
  еякх (ярюф_бндхрекъ1 > 0) рнцдю { ярюф1:=рейсыхи_цнд - ярюф_бндхрекъ1; }
  хмюве { ярюф1:=рейсыхи_цнд; }
  еякх (ярюф_бндхрекъ2 > 0) рнцдю { ярюф2:=рейсыхи_цнд - ярюф_бндхрекъ2; }
  хмюве { ярюф2:=рейсыхи_цнд; }
  еякх (ярюф_бндхрекъ3 > 0) рнцдю { ярюф3:=рейсыхи_цнд - ярюф_бндхрекъ3; }
  хмюве { ярюф3:=рейсыхи_цнд; }
  еякх (ярюф_бндхрекъ4 > 0) рнцдю { ярюф4:=рейсыхи_цнд - ярюф_бндхрекъ4; }
  хмюве { ярюф4:=рейсыхи_цнд; }
  еякх (ярюф_бндхрекъ5 > 0) рнцдю { ярюф5:=рейсыхи_цнд - ярюф_бндхрекъ5; }
  хмюве { ярюф5:=рейсыхи_цнд; }

  лхм_ярюф:= MinVal(ярюф1, ярюф2, ярюф3, ярюф4, ярюф5);
  еякх (лхм_ярюф = рейсыхи_цнд ) рнцдю { лхм_ярюф:= 0;}

  еякх (лхм_ярюф < 1) рнцдю {
    еякх (рхо_днцнбнпю = 1) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
    еякх (рхо_днцнбнпю = 2) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
    еякх (рхо_днцнбнпю = 3) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
  }
  еякх (лхм_ярюф >= 1) AND (лхм_ярюф < 3) рнцдю {
    еякх (рхо_днцнбнпю = 1) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
    еякх (рхо_днцнбнпю = 2) рнцдю { й4_лхм:= 1.0; й4_люйя:= 1.1; }
    еякх (рхо_днцнбнпю = 3) рнцдю { й4_лхм:= 1.0; й4_люйя:= 1.1; }
  }
  еякх (лхм_ярюф >= 3) AND (лхм_ярюф < 10) рнцдю {
    еякх (рхо_днцнбнпю = 1) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
    еякх (рхо_днцнбнпю = 2) рнцдю { й4_лхм:= 1.0; й4_люйя:= 1.0; }
    еякх (рхо_днцнбнпю = 3) рнцдю { й4_лхм:= 1.0; й4_люйя:= 1.0; }
  }
  еякх (лхм_ярюф > 10) рнцдю {
    еякх (рхо_днцнбнпю = 1) рнцдю { й4_лхм:= 1.2; й4_люйя:= 1.5; }
    еякх (рхо_днцнбнпю = 2) рнцдю { й4_лхм:= 0.9; й4_люйя:= 1.0; }
    еякх (рхо_днцнбнпю = 3) рнцдю { й4_лхм:= 0.9; й4_люйя:= 1.0; }
  }

[пюявер_й5]
  йнкхв_няна:= 0;
  й5_лхм:= 1.0; 
  й5_люйя:= 1.0;

  еякх (ярюф_бндхрекъ1 > 0) рнцдю { йнкхв_няна:= йнкхв_няна + 1; }
  еякх (ярюф_бндхрекъ2 > 0) рнцдю { йнкхв_няна:= йнкхв_няна + 1; }
  еякх (ярюф_бндхрекъ3 > 0) рнцдю { йнкхв_няна:= йнкхв_няна + 1; }
  еякх (ярюф_бндхрекъ4 > 0) рнцдю { йнкхв_няна:= йнкхв_няна + 1; }
  еякх (ярюф_бндхрекъ5 > 0) рнцдю { йнкхв_няна:= йнкхв_няна + 1; }

  еякх (рхо_днцнбнпю = 1) рнцдю { й5_лхм:= 1.0; й5_люйя:= 1.0; }
  еякх (рхо_днцнбнпю = 2) рнцдю { й5_лхм:= 1.0; й5_люйя:= 1.0; }
  еякх (рхо_днцнбнпю = 3) рнцдю
  {
    еякх (йнкхв_няна > 2) рнцдю { й5_лхм:= 1.2; й5_люйя:= 1.4; }
    хмюве {
      еякх (йнкхв_няна = 2) рнцдю { 
        й5_лхм:= 1.0; 
        й5_люйя:= 1.1; 
      }
      хмюве { 
        й5_лхм:= 1.0; 
        й5_люйя:= 1.0; 
      }
    }
  }

[пюявер_й6]
  еякх (пецпеяямше_хяйх = 0) рнцдю { й6:= 1.0; } ELSE { й6:= 2.0; }

[пюявер_й7]
  й7:= 1.0;
  еякх (япнй_днцнбнпю =  0) рнцдю { й7:= 0.15; }
  еякх (япнй_днцнбнпю =  1) рнцдю { й7:= 0.20; }
  еякх (япнй_днцнбнпю =  2) рнцдю { й7:= 0.30; }
  еякх (япнй_днцнбнпю =  3) рнцдю { й7:= 0.40; }
  еякх (япнй_днцнбнпю =  4) рнцдю { й7:= 0.50; }
  еякх (япнй_днцнбнпю =  5) рнцдю { й7:= 0.60; }
  еякх (япнй_днцнбнпю =  6) рнцдю { й7:= 0.70; }
  еякх (япнй_днцнбнпю =  7) рнцдю { й7:= 0.75; }
  еякх (япнй_днцнбнпю =  8) рнцдю { й7:= 0.80; }
  еякх (япнй_днцнбнпю =  9) рнцдю { й7:= 0.85; }
  еякх (япнй_днцнбнпю = 10) рнцдю { й7:= 0.90; }
  еякх (япнй_днцнбнпю = 11) рнцдю { й7:= 0.95; }
  еякх (япнй_днцнбнпю = 12) рнцдю { й7:= 1.00; }
  еякх (япнй_днцнбнпю <> 12) AND (бхд_днцнбнпю<>0) рнцдю { бхд_днцнбнпю:=0; }

[пюявер_анмся_люкся]
  еякх (йкюяя_бндхрекъ = 14) рнцдю { анмся_люкся:= 2.45 }
  еякх (йкюяя_бндхрекъ = 0) рнцдю { анмся_люкся:= 2.30 }
  еякх (йкюяя_бндхрекъ = 1) рнцдю { анмся_люкся:= 1.55 }
  еякх (йкюяя_бндхрекъ = 2) рнцдю { анмся_люкся:= 1.40 }
  еякх (йкюяя_бндхрекъ = 3) рнцдю { анмся_люкся:= 1.00 }
  еякх (йкюяя_бндхрекъ = 4) рнцдю { анмся_люкся:= 0.95 }
  еякх (йкюяя_бндхрекъ = 5) рнцдю { анмся_люкся:= 0.90 }
  еякх (йкюяя_бндхрекъ = 6) рнцдю { анмся_люкся:= 0.85 }
  еякх (йкюяя_бндхрекъ = 7) рнцдю { анмся_люкся:= 0.80 }
  еякх (йкюяя_бндхрекъ = 8) рнцдю { анмся_люкся:= 0.75 }
  еякх (йкюяя_бндхрекъ = 9) рнцдю { анмся_люкся:= 0.70 }
  еякх (йкюяя_бндхрекъ = 10) рнцдю { анмся_люкся:= 0.65 }
  еякх (йкюяя_бндхрекъ = 11) рнцдю { анмся_люкся:= 0.60 }
  еякх (йкюяя_бндхрекъ = 12) рнцдю { анмся_люкся:= 0.55 }
  еякх (йкюяя_бндхрекъ = 13) рнцдю { анмся_люкся:= 0.50 }
