СтрокаМРЦ = "00,220,225,231,234,240,247,252,257,263,266,273,281,287,292,296,301,308,314,319,324,328,333,340,346,351,355,362,369,374,379,385,388,394,401";
СтрокаМОЦ = "00,187,192,196,201,205,209,214,219,223,228,232,238,241,247,250,256,261,265,272,275,279,283,288,292,297,302,308,312,315,321,324,331,333,340";
СтрокаМПЦ = "00,179,184,189,193,198,202,206,211,215,220,224,229,233,238,242,246,251,255,260,264,271,274,278,282,286,291,295,301,305,309,314,317,322,327";
// =МРЦ=
Ц0 = 2*Число(Сред(СтрокаМРЦ,(МАКС(0,мин(СтрДлина(СтрокаМРЦ)-2,4*(Окр(?(К="200",МАКС(Г,40),Г)+.5,0,0)-28)))),3));
Ц = ?(Найти("200,212,236,280",К)>0,?(Найти("280",К)>0,МАКС(Ц0,750),Ц0),?(Найти("232,237,239,242,251,252",К)>0,750,?(Найти("229,230,231,233,234,235",К)>0,1034,?(Найти("440,441,442,443,450,451,452,453",К)>0,318.66666,0))))*?((Е>.375)и(Е<.5)и(К="200"),.5,Е); // основная
Ц = Окр(Ц,2,1)+?(Ц-Окр(Ц,2,1)>0,0.01,0);
// =МОЦ=
Ц0 = 2*Число(Сред(СтрокаМОЦ,(МАКС(0,мин(СтрДлина(СтрокаМОЦ)-2,4*(Окр(?(К="200",МАКС(Г,40),Г)+.5,0,0)-28)))),3));
Ц1 = ?(Найти("200,212,236,280",К)>0,?(Найти("280",К)>0,МАКС(Ц0,608),Ц0),?(Найти("232,237,239,242,251,252",К)>0,608,?(Найти("229,230,231,233,234,235",К)>0,838,?(Найти("440,441,442,443,450,451,452,453",К)>0,265.33333,0))))*?((Е>.375)и(Е<.5)и(К="200"),.5,Е); // основная
Ц1 = Окр(Ц1,2,1)+?(Ц1-Окр(Ц1,2,1)>0,0.01,0);
// =МПЦ=
Ц0 = 2*Число(Сред(СтрокаМПЦ,(МАКС(0,мин(СтрДлина(СтрокаМПЦ)-2,4*(Окр(?(К="200",МАКС(Г,40),Г)+.5,0,0)-28)))),3));
Ц2 = ?(Найти("200,212,236,280",К)>0,?(Найти("280",К)>0,МАКС(Ц0,578),Ц0),?(Найти("232,237,239,242,251,252",К)>0,578,?(Найти("229,230,231,233,234,235",К)>0,794,?(Найти("440,441,442,443,450,451,452,453",К)>0,221.33333,0))))*?((Е>.375)и(Е<.5)и(К="200"),.5,Е); // основная
Ц2 = Окр(Ц2,2,1)+?(Ц2-Окр(Ц2,2,1)>0,0.01,0);