Цифрова математична модель динаміки польоту літака Ту-І54Б в режимі автоматичного управління приладовою швидкістю через руль висоти
vpr:=y[3]*sqrt(roh/ro);
vpr0:=vpr;
vprzad:=vpr0+10;
if vib=3 then vprzad:=vpr0;
print_bal;
end;
{____________________________________________________________________________}
{Закон стабілізаціїї приладової швидкості через руль висоти}
procedure SAU;
begindeltavpr:=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;