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

UptoLike

ВУЗ: 

ТГТУ | Тамбов

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

Рубрика: 

304
192 LOCATE 4, 1: PRINT "РАСЧЕТ ПО ВТОРОМУ ВАРИАНТУ – НА
УСТОЙЧИВОСТЬ"
K1 = SQR(P1 / (E * J1))
A1 = RO * F1 * (X(A) – (SIN(K1 * X(A))) / K1) / (K1 * COS(K1 * X(A)))
Fmax01(A) = RO * F1 / K1 ^ 2 * (1 / K1 ^ 2 + X(A) ^ 2 / 2) / (E * J1)
Fmax02(A) = 1 / K1 * (RO * F1 / K1 ^ 3 + A1 * X(A)) * COS(K1 * X(A))
/ (E * J1)
Fmax03(A) = 1 / K1 ^ 2 * (RO * F1 * X(A) / K1 – A1) * SIN(K1 * X(A)) /
(E * J1)
Fmax2(A) = (Fmax01(A) – Fmax02(A) – Fmax03(A))
LOCATE 24, 1: PRINT "МАКСИМАЛЬНЫЙ ПРОГИБ F2 = ";
Fmax2(A); " [м]"
195 LINE(40, 100)-(40, 300): LINE (40, 300)-(600, 300)
LINE(550, 100)-(550, 300):LINE(600, 100)-(600, 300)
FOR X = 40 TO 600 STEP 7.5
LINE (X, 298)-(X, 302), 6: NEXT X: FOR X1 = 40 TO 600 STEP 75 / 2
LINE (X1, 296)-(X1, 304), 6: NEXT X1: FOR Y1 = 300 TO 100 STEP -5
LINE (38, Y1)-(42, Y1), 7: NEXT Y1: FOR Y2 = 300 TO 100 STEP -25
LINE (36, Y2)-(44, Y2), 7: NEXT Y2
FOR T1 = 300 TO 100 STEP -5: LINE (597, T1)-(603, T1), 6
NEXT T1: FOR T2 = 300 TO 100 STEP -25: LINE (595, T2)-(605, T2), 6:
NEXT T2
FOR Z1 = 300 TO 100 STEP -5: LINE (547, Z1)-(553, Z1), 6
NEXT Z1: FOR Z2 = 300 TO 100 STEP -25: LINE (545, Z2)-(555, Z2), 6:
NEXT Z2
LOCATE 20, 6: PRINT "0": LOCATE 20, 14: PRINT "0.1":
LOCATE 20, 23: PRINT "0.2": LOCATE 20, 75: PRINT "X,M"
LOCATE 20,33: PRINT "0.3": LOCATE 20, 41: PRINT "0.40"
LOCATE 20,51: PRINT"0.50": LOCATE 20, 61: PRINT "0.60"
LOCATE 14, 47: PRINT "Ми(X)": LOCATE 16, 51: PRINT "Мкр(X)"
LOCATE 6, 6: PRINT "Ми,Н*м"
LOCATE 16, 1: PRINT "5": LOCATE 13, 1: PRINT "10": LOCATE 10,
1: PRINT "20"
LOCATE 6, 63: PRINT "Мкр,Н*м"
LOCATE 16, 65: PRINT "1.0": LOCATE 7, 65: PRINT "4.0"
LOCATE 13, 65: PRINT "2.0": LOCATE 10, 65: PRINT "3.0"
LOCATE 6, 72: PRINT "Y,мкм": LOCATE 18, 40: PRINT "Y(X)"
LOCATE 16, 71: PRINT "40": LOCATE 14, 71: PRINT "60"
LOCATE 12, 71: PRINT "80": LOCATE 18, 71: PRINT "20"
LOCATE 10, 71: PRINT "100": LOCATE 8, 71: PRINT "120"
LINE (40 + X(A) * 375 * 2, 300 – MIZ(A) * 10)-(40 + (X(A) – hx1) * 375
* 2, 300 – MIZ1 * 10)

Страницы