ії»)} then:=strtofloat(edit10.text);:=strtofloat(edit11.text);:=strtofloat(edit12.text);:=strtofloat(edit13.text);s:=strtofloat(edit14.text);s:=strtofloat(edit15.text);s:=strtofloat(edit16.text);s:=strtofloat(edit17.text);:=strtofloat(edit20.text);s:=in1/(in1+0.139);s:=in2/(in2+0.139);s:=in3/(in3+0.139);s:=in4/(in4+0.139);s2:=in1/(in1+2*0.139);s2:=in2/(in2+2*0.139);s2:=in3/(in3+2*0.139);s2:=in4/(in4+2*0.139);s:=m1s2-m1s*m1s;s:=m2s2-m2s*m2s;s:=m3s2-m3s*m3s;s:=m4s2-m4s*m4s;:=m1s*kol1s+m2s*kol2s+m3s*kol3s+m4s*kol4s;:=var1s*kol1s+var2s*kol2s+var3s*kol3s+var4s*kol4s;:= SummM + Mz;:=SummVar + Dz;:=1.645 * sqrt (Dz);:=Ls / Mz; ss:=roundto (m1s * (1 + Tetas) * DolSt, - 1); ss:=roundto (m2s * (1 + Tetas) * DolSt, - 1); ss:=roundto (m3s * (1 + Tetas) * DolSt, - 1); ss:=roundto (m4s * (1 + Tetas) * DolSt, - 1);.caption:=floattostr(p21ss);.caption:=floattostr(p22ss);.caption:=floattostr(p23ss);.caption:=floattostr(p24ss);.Visible:=True;.Visible:=True;.Visible:=True;.Visible:=True;;ComboBox1.Text=«Смешанное» {(ComboBox2.Text=«Пропорційно нетто-премії»)} then:=strtofloat(edit1.text);:=strtofloat(edit2.text);:=strtofloat(edit3.text);:=strtofloat(edit4.text);:=strtofloat(edit5.text);:=strtofloat(edit6.text);:=strtofloat(edit7.text);:=strtofloat(edit8.text);:=strtofloat(edit9.text);:=strtofloat(edit18.text);:=strtofloat(edit19.text);:=pn1*1+pe1*2;:=pn2*1+pe2*2;:=pn3*1+pe3*2;:=1*1*pn1+2*2*pe1-m1*m1;:=1*1*pn2+2*2*pe2-m2*m2;:=1*1*pn3+2*2*pe3-m3*m3;:=m1*kol1+m2*kol2+m3*kol3;:=var1*kol1+var2*kol2+var3*kol3;:=1.645*sqrt(SummVar);:=L/SummM;:=roundto(m1*(1+Teta)*sumn,- 1);:=roundto (m2 * (1 + Teta) * sumn, - 1);:=roundto (m3 * (1 + Teta) * sumn, - 1);.caption:=floattostr(pr1);.caption:=floattostr(pr2);.caption:=floattostr(pr3);.Visible:=True;.Visible:=True;.Visible:=True;;:=strtofloat(edit10.text);:=strtofloat(edit11.text);:=strtofloat(edit12.text);:=strtofloat(edit13.text);s:=strtofloat(edit14.text);s:=strtofloat(edit15.text);s:=strtofloat(edit16.text);s:=strtofloat(edit17.text);:=strtofloat(edit20.text);s:=in1/(in1+0.139);s:=in2/(in2+0.139);s:=in3/(in3+0.139);s:=in4/(in4+0.139);s2:=in1/(in1+2*0.139);s2:=in2/(in2+2*0.139);s2:=in3/(in3+2*0.139);s2:=in4/(in4+2*0.139);s:=m1s2-m1s*m1s;s:=m2s2-m2s*m2s;s:=m3s2-m3s*m3s;s:=m4s2-m4s*m4s;:=m1s*kol1s+m2s*kol2s+m3s*kol3s+m4s*kol4s;:=var1s*kol1s+var2s*kol2s+var3s*kol3s+var4s*kol4s;:=SummM+Mz;:=SummVar+Dz;:=1.645*sqrt(SummDz);:= Ls / SummMz; s:=m1 * (1 + Tetas); s:=m2 * (1 + Tetas); s:=m3 * (1 + Tetas); s:=m1s * (1 + Tetas); s: =m2s * (1 + Tetas); s:=m3s * (1 + Tetas); s:=m4s * (1 + Tetas); ss:=p11s * sume; ss:=p12s * sume; ss:=p13s * sume; ss:=roundto (p21s * DolSt, - 1); ss:=roundto (p22s * DolSt, - 1); ss:=roundto (p23s * DolSt, - 1); ss:=roundto (p24s * DolSt,- 1);.caption:=floattostr(p21ss);.caption:=floattostr(p22ss);.caption:=floattostr(p23ss);.caption:=floattostr(p24ss);.Visible:=True;.Visible:=True;.Visible:=True;.Visible:=True;;
{if (ComboBox1.Text=«Змішане») (ComboBox2.Text=«Пропорційно дисперсії») then:=strtofloat(edit1.text);:=strtofloat(edit2.text);:=strtofloat(edit3.text);:=strtofloat(edit4.text);:=strtofloat(edit5.text);:=strtofloat(edit6.text);:=strtofloat(edit7.text);:=strtofloat(edit8.text);:=strtofloat(edit9.text);:=strtofloat(edit18.text);:=strtofloat(edit19.text);:=pn1*1+pe1*2;:=pn2*1+pe2*2;:=pn3*1+pe3*2;:=1*1*pn1+2*2*pe1-m1*m1;:=1*1*pn2+2*2*pe2-m2*m2;:=1*1*pn3+2*2*pe3-m3*m3;:=m1*kol1+m2*kol2+m3*kol3;:=var1*kol1+var2*kol2+var3*kol3;:=1.645*sqrt(SummVar)...
