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

UptoLike

309
720 VZ = VZ * (((X ^ 4) / 12 – (L / 6) * (X ^ 3) + ((L ^ 3) / 12) * X) – (4 *
B) * ((X ^ 5) / 20 – (L * (X ^ 4)) / 12 + ((L ^ 4) * X) / 30) + (10 * (B ^ 2)) *
((X ^ 6) / 30 – (L * (X ^ 5)) / 20 + ((L ^ 5) / 60) * X))
725 VZ = VZ / E / J0
730 A1 = (X ^ 5) / 20 – ((L ^ 2) * (X ^ 3)) / 6 + (14 * (L ^ 4) * X) / 120 –
(4 * B) * ((X ^ 6) / 30 – ((L ^ 2) * (X ^ 4)) / 12 + (18 * (L ^ 5) * X) / 360) +
10 * (B ^ 2) * ((X ^ 7) / 42 – ((L ^ 2) * (X ^ 5)) / 20 + (22 * X * (L ^ 6)) /
840)
740 A1 = (1 / E / J0 / 3) * A1 * DEL * (PMAX * SIN(F1) / ((L ^ 2) * A)) *
(D2 – D1)
750 VZ = VZ + A1
755 PRINT "VZ = "; VZ
760 MOX = SQR(MY ^ 2 + MZ ^ 2)
770 VOX = SQR(VY ^ 2 + VZ ^ 2)
772 AWD = J1 / J2
773 PRINT "J1/J2"; AWD
780 SE = (E / (L ^ 2)) * ETA * J2
790 VX = VOX / (1 – NX / SE)
800 FX = (P1 / 4) * DX
810 WOX = (P1 / 32) * (DX ^ 3)
820 GMAX = ABS(ABS(NX) / FX + MOX / WOX + (ABS(NX) / WOX) *
VX)
830 A1 = (((L ^ 3) / 12) * (D – D1)) – ((L ^ 3) / 32) * (D2 – D1) – ((D –
D1) * (L ^ 3)) / (16 * (P1 ^ 2)) + ((D2 – D1) / (16 * (P1 ^ 2))) * L ^ 3
840 A1 = (A1 / L) * B * COS(F1)
850 A1 = A1 + ((P1 / 8) * L * (D ^ 2))
860 A2 = (L / 2) + B * (L ^ 2) + 6 * (B ^ 2) * (((L ^ 3) / 6) – ((L ^ 3) / (4 *
(P1 ^ 2)))) + (4 * (B ^ 3)) * (((L ^ 4) / 8) – ((3 / 8) * ((L ^ 4) / (P1 ^ 2))))
880 A3 = (B ^ 4) * ((L ^ 5) / 10 – (L ^ 5) / (2 * (P1 ^ 2)) + (3 / 4 / P1 ^ 4) *
L ^ 5)
890 A2 = A2 + A3
900 A2 = ((A2 * E * J1) / (L ^ 2)) * (P1 ^ 2): PMAXP = A2 / A1
920 TMAX = ABS(Mx / 2 / WOX): GR = SQR((GMAX ^ 2) + 4 * (TMAX
^ 2))
940 NU = PMAXP / PMAX
950 PRINT "Внутpеннее усилие NX = "; NX, "MX = "; Mx, "MY = ";
MY, "MZ = "; MZ
960 PRINT "Пpогибы VY = "; VY, "VZ = "; VZ, "Полный пpогиб VX =
"; VX
970 PRINT "SIGMAMAX = "; GMAX, "Pmaxкp = "; PMAXP, "TAUmax
= "; TMAX; "NU = "; NU; "SIGMAR = "; GR