Контрольная работа: Расчет лампы бегущей волны О-типа малой мощности

dli:=ls/4;

p:=fma/fmi;

t:=-1/cos(pi*p/(1+p));

aa2:=2*(1-1/sqr(t));

g1:=0.5*ln(z0/zv)/(2+aa2);

g2:=aa2*g1;

zz1:=z0*exp(-2*g1);

zz2:=zz1*exp(-2*g2);

dv:=exp((-zv/138)*ln(10));

dd1:=exp((-zz1/138)*ln(10));

dd2:=exp((-zz2/138)*ln(10));

dvh:=exp((-z0/138)*ln(10));

end;

procedure SchetZS;

begin

fma:=c/ln0;

fmi:=c/lnv;

ls:=2*ln0*lnv/(ln0+lnv);

fs:=c/ls;

a:=3.14e-4*ls*et*sqrt(u0);

h:=39.6*a*a/(ls*(0.31+0.95*et)*(0.72+0.06*et));

d:=0.5*h;

r:=ln0/4;

rs:=15*ls/(2*pi*a);

z:=w*c/(5.93e7*sqrt(u0));

i0:=pi*0.25*a*a*j0;

s:=exp(1/3*ln((z*i0)/(4*u0)));

ar:=1.83e10*sqrt(j0)*sqrt(sqrt(u0))/(2*pi*5e9);

fom:=q4*s*s*s/(ar*ar);