Цифровая математическая модель динамики полёта самолёта Ту 154Б в режиме, Детальна інформація

a:=InterpolFunction11(y[6],HTab,VzvukaTab);

Vpr := y[3]*sqrt(Roh/Ro);

dVpr := Vpr - Vprzad;

M := Y[3]/a;

Qdv:=0.2586*M+0.4428;

mzfist:=InterpolFunction1(M,ChisloMahaTab,mzffist);

mzal:=InterpolFunction1(M,ChisloMahaTab,mzalfa);

if flagbal=1 then

begin

Balansirovka;

flagbal:=0;

end;

Mzal1:=InterpolFunction11(Y[5],alfa_mzalt , mzaltfal);

Mzdv:=InterpolFunction1(y[5],mzdval1,mzdvTab1);

Mzwz:=InterpolFunction1(M,ChisloMahaTab,mzwzTab);

Cy:=InterpolFunction11(y[5],cyal__,cytab__);

Cx:=InterpolFunction1(Cy,Cy_Cx,CxTab);

Відмова двигуна }

if (vib=2) or (vib=3) then begin

if ((T>=0) and (T<=4)) then

P1:=interpolfunction11(T,time,pft);

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;