Инженерная оптимизация оборудования для переработки полимерных материалов. Клинков А.С - 299 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

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

Рубрика: 

299
fymax4 = (Va + Vb) * 1 / 6 * ll2 ^ 3 – (RR1 + RR2) * (1 / 4 * ll2 ^ 2 *
ll3 – 1 / 6 * ll2 ^ 3)
fymax = 1 / EE / JJ1 * (fymax1 – fymax2 – fymax3) + 1 / EE / JJ2 *
fymax4
fmax = (fxmax ^ 2 + fymax ^ 2) ^ .5
'PRINT "SIGb="; SIGb; "SIGz="; SIGz; "SIGp="; SIGp; "fmax=";
fmax
'PRINT #1, "SIGb="; SIGb; "SIGz="; SIGz; "SIGp="; SIGp; "fmax=";
fmax
IF INQ = 2 THEN GOTO 100
IF INQ = 3 THEN GOTO 200
CLS
'PRINT "x#(1)="; X#(1); "x#(2)="; X#(2); "x#(3)="; X#(3)
'PRINT #1, "x#(1)="; X#(1); "x#(2)="; X#(2); "x#(3)="; X#(3)
'PRINT "SIGb="; SIGb; "SIGz="; SIGz; "SIGp="; SIGp; "fmax=";
fmax; ""
'PRINT #1, "SIGb="; SIGb; "SIGz="; SIGz; "SIGp="; SIGp; "fmax=";
fmax; ""
'PRINT "Mkrc="; Mkrc; "Mkra="; Mkra; "Mkre="; Mkre
'PRINT #1, "Mkrc="; Mkrc; "Mkra="; Mkra; "Mkre="; Mkre
'PRINT "W0e="; W0e; "W0c="; W0c; "W0a="; W0a
'PRINT #1, "W0e="; W0e; "W0c="; W0c; "W0a="; W0a
'PRINT "Mxa="; Mxa; "Mea="; Mya; "Mxc="; Mxc; "Mxe="; Mxe;
"Mye="; Mye; "Mua="; Mua; "Mue="; Mue
'PRINT #1, "Mxa="; Mxa; "Mea="; Mya; "Mxc="; Mxc; "Mxe="; Mxe;
"Mye="; Mye; "Mua="; Mua; "Mue="; Mue
'PRINT "qp="; qp; "qg="; qg; "Fr="; Fr; "Mkr="; Mkr; "Mkr1="; Mkr1;
"Mkr2="; Mkr2
'PRINT #1, "qp="; qp; "Fr="; Fr; "Mkr="; Mkr; "Mkr1="; Mkr1;
"Mkr2="; Mkr2
'PRINT "PP1="; PP1; "PP2="; PP2; "Ha="; Ha; "Hb="; Hb; "Va="; Va;
"Vb="; Vb; "ll1="; ll1
'PRINT #1, "PP1="; PP1; "PP2="; PP2; "Ha="; Ha; "Hb="; Hb; "Va=";
Va; "Vb="; Vb; "ll1="; ll1; "ll2="; ll2; "ll3="; ll3
'ограничений в виде равенств нет
GOTO 300
'ограничения в виде неравенств
100
R#(1) = 1 – 40 / X#(1)
R#(2) = 120 / X#(1) – 1
R#(3) = 1 – 40 / X#(2)
R#(4) = 70 / X#(2) – 1
R#(5) = 1 – 40 / X#(3)

Страницы