Реферат: Цифровая математическая модель динамики полёта самолёта Ту 154Б в режиме
end;
if ((vib=3) or (ssau=1)) and (t>1.0) then SAU;
dv:=dvbal+dvsau;
MzStat:=mzo+mzal*Y[5]+mzdv*dv+mzdz*dz+mzfist*fist;
MzVra := (MzWz*Y[2] + MzAL1*X[5])*Ba/(RAD*Y[3]);
Mz := (MzStat + MzVra);
DG := 0;
Pdv := Po + Pv*Y[3] + Ph*Y[6] + Pdg*(DGBal+DG-66);
dMzdv := (Pbal/3 - Potk) * 0.5;
{____________________________________________________________________________}
x[1]:=y[2];
x[2]:=(Mz*S*Ba*q+dMzdv)*RAD/Iz;
x[3]:=(-G*sin(Y[4]/RAD)+(2*Pdv+P1)*cos((Y[5]+FIdv)/RAD)-Xe)/_m;
x[4]:=(-G*cos(Y[4]/RAD)+(2*Pdv+P1)*sin((Y[5]+FIdv)/RAD)+Ye)*RAD/(_m*Y[3]);
x[5]:=x[1]-x[4];
x[6]:=y[3]*sin(y[4]/RAD);
x[7]:=y[3]*cos(y[4]/RAD);
x[8]:=-3*qdv;
{____________________________________________________________________________}
{Добалансування літака}
if flag =1 then begin
d[1]:=-x[1];
d[2]:=-x[2];
d[3]:=-x[3];
d[4]:=-x[4];
d[5]:=-x[5];
d[6]:=-x[6];
flag:=0;
end;