Автоматизация процесса расчета стальных конструкций балочной клетки. Макаров А.А - 172 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

if la>120 then goto 50;
gosub;
si:=n/(f*4*aCi]);
if si>r then goto 50;
ЬЬ
[5]:=
аШ
; 59:
i:=0;
60: i:=i+l;
if i>70 then goto 69;
rx3:=sqrt((4*ixoCi]+4*a[i]*(2*zoCi]*zo[i]))/4/a[i]);
Ia:=le/rx3;
if la>120 then goto 60;
gosub;
si:=n/(f*4*aCi]);
if si>r then goto 60;
bbC6]:=a[i]; 69:
i:=0; 70: I:=1+1;
if i>70 then goto 110;
rx4:=sqrt((4*ix[i]+4*a[i]*zoEi]*zo[i])/4/a[i]);
Ia:=le/rx4;
if la>120 then goto 70;
gosub;
si:=n/(f*4*aCi]);
if si>r then goto 70;
bbC73:=aCi];
110:exit; end;
procedure prover(i:integer);
begin
Ш
->
readln(aa[i]);
Ш
+>
while ioresultoO do
begin
VvodWindow(20,2,60,2,3,0);

Страницы