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

deltavpr:=vprzad-vpr;

x[15]:=(1-y[15])/t_v;

x[16]:=(1-y[16])/t_v1;

x[17]:=kidv;

fun:=y[17]*deltavpr;

if(Fun>10) then Fun:=10;

if(Fun<-10) then Fun:=-10;

delta1:=(k_v*x[15]*deltavpr+x[16]*k_v1*100*deltavpr+fun);

if delta1 < -10 then delta1:=-10;

if delta1 > 10 then delta1:=10;

dTeta:=Y[1]-Tetab;

delta:=delta1+Kteta*dTeta;

if delta <-3.5 then delta:=-3.5;

if delta >3.5 then delta:=3.5;

Sigma:=delta+Kwz*Y[2];

if Sigma<-10 then Sigma:=-10;

if Sigma>10 then Sigma:=10;

X[9]:=0;

if delta<-2 then X[9]:=-0.6;

if delta>2 then X[9]:=0.6;

DVsau:=Sigma+Y[9];

end;

{____________________________________________________________________________}

{Система диференціальних рівнянь}

procedure dinamika;

begin

Roh := Ro - 0.0117*Y[6]/1000 + 0.000343*sqr(Y[6]/1000);

G:=G0+y[8];

_m := G/_g;

q := Roh*sqr(Y[3])/2;