Курсовая работа: Вероятностные процессы и математическая статистика в автоматизированных системах

xxx:=-1;

while xxx<=1 do

begin series1.AddXY(xxx,fy(xp1[1],xxx,xp3[1]));

series2.AddXY(xxx,fy(xp1[2],xxx,xp3[2]));

series3.AddXY(xxx,fy(xp1[3],xxx,xp3[3]));

xxx:=xxx+0.01;

end;

memo3.Clear;

memo3.Lines.Add('Ëèíèè ðåãðåññèè:');

memo3.Lines.Add('y= '+floattostrf(fy(xp1[1],0,xp3[1]),fffixed,4,2)+

' + '+floattostrf(b[2]+b[4]*xp1[1]+b[6]*xp3[1],fffixed,4,2)+

'*x2 + '+floattostrf(b[8],fffixed,4,2)+'*x2^2');

memo3.Lines.Add('y= '+floattostrf(fy(xp1[2],0,xp3[2]),fffixed,4,2)+

' + '+floattostrf(b[2]+b[4]*xp1[2]+b[6]*xp3[2],fffixed,4,2)+

'*x2 + '+floattostrf(b[8],fffixed,4,2)+'*x2^2');

memo3.Lines.Add('y= '+floattostrf(fy(xp1[3],0,xp3[3]),fffixed,4,2)+

' + '+floattostrf(b[2]+b[4]*xp1[3]+b[6]*xp3[3],fffixed,4,2)+

'*x2 + '+floattostrf(b[8],fffixed,4,2)+'*x2^2');

end;

2: begin groupbox7.Visible:=true;

label28.Caption:='x1='; label29.Caption:='x2=';

label30.Caption:='x1='; label31.Caption:='x2=';

label32.Caption:='x1='; label33.Caption:='x2=';

label34.Caption:='x3=';

xp1[1]:=strtofloat(edit1.text); xp2[1]:=strtofloat(edit2.text);

xp1[2]:=strtofloat(edit3.text); xp2[2]:=strtofloat(edit4.text);

xp1[3]:=strtofloat(edit5.text); xp2[3]:=strtofloat(edit6.text);

xxx:=-1;

while xxx<=1 do