Lista de exercicio - dinamica de maquinas

Prévia do material em texto

7- Programa base
clear all 
clc 
a=8
b=8
c=9
d=6
teta=25
K1=d/a
K2=d/c
K3=(a^2-b^2+c^2+d^2)/(2*a*c)
K4=d/b
K5=(c^2-d^2-a^2-b^2)/(2*a*b)
A=cosd(teta)-K1-K2*cosd(teta)+K3
B=-2*sind(teta)
C=K1-(K2+1)*cosd(teta)+K3
D=cosd(teta)-K1+K4*cosd(teta)+K5
E=-2*sind(teta)
F=K1+(K4-1)*cosd(teta)+K5
mprintf("Valor de A = %f",A)
mprintf("\n Valor de B = %f",B)
mprintf("\n Valor de C = %f",C)
mprintf("\n Valor de D = %f",D)
mprintf("\n Valor de E = %f",E)
mprintf("\n Valor de F = %f",F)
teta3_1= 2*atand((-E- sqrt(E^2-4*D*F))/(2*D))
teta3_2= 2*atand((-E+ sqrt(E^2-4*D*F))/(2*D))
teta4_1= 2*atand((-B- sqrt(B^2-4*A*C))/(2*A))
teta4_2= 2*atand((-B+ sqrt(B^2-4*A*C))/(2*A))
mprintf("\n \n Valores dos Tetas 3 e 4 \n ")
mprintf("\n Teta3 Aberto = %.4f",teta3_1)
mprintf("\n Teta4 Aberto = %.4f",teta4_1)
mprintf("\n Teta3 Cruzado = %.4f",teta3_2)
mprintf("\n Teta4 Cruzado = %.4f",teta4_2)
Resultado 
Valor de A = 0.364603
 Valor de B = -0.845237
 Valor de C = 0.051987
 Valor de D = 0.187601
 Valor de E = -0.845237
 Valor de F = -0.125014
 
 Valores dos Tetas 3 e 4 
 
 Teta3 Aberto = -16.3149
 Teta4 Aberto = 7.2360
 Teta3 Cruzado = 155.7205
 Teta4 Cruzado = 132.1695
B)
Valor de A = -0.142788
 Valor de B = -1.532089
 Valor de C = 2.571637
 Valor de D = -2.571637
 Valor de E = -1.532089
 Valor de F = 0.142788
 
 Valores dos Tetas 3 e 4 
 
 Teta3 Aberto = 9.3676
 Teta4 Aberto = 111.7494
 Teta3 Cruzado = -68.2506
 Teta4 Cruzado = -170.6324
C)
Valor de A = 0.474730
 Valor de B = -1.969616
 Valor de C = 1.727433
 Valor de D = -1.279055
 Valor de E = -1.969616
 Valor de F = -0.026352
 
 Valores dos Tetas 3 e 4 
 
 Teta3 Aberto = -1.5466
 Teta4 Aberto = 103.0910
 Teta3 Cruzado = -113.5395
 Teta4 Cruzado = 141.8229
8) Programa base
clear
clear all
a=5
c=3
d=8
o2=25
E=60
R=-c*sind(E)
mprintf ('R= %.3f\n',R)
P=a*sind(o2)*sind(E)+(a*cosd(o2)-d)*cosd(E)
mprintf ('P= %.3f\n',P)
Q=-a*sind(o2)*cosd(E)+(a*cosd(o2)-d)*sind(E)
mprintf ('Q= %.3f\n',Q)
S=R-Q
mprintf ('S= %.3f\n',S)
T=2*P
mprintf ('T= %.3f\n',T)
U=Q+R
mprintf ('U= %.3f\n',U)
o41=2*atand((-T+sqrt(T^2-4*S*U))/(2*S))
mprintf ('o41 ABERTO= %.3f\n',o41)
o31=o41+E
mprintf ('o31-ABERTO= %.3f\n',o31)
b1=abs((a*sind(o2)-c*sind(o41))/sind(o31))
mprintf ('b1-ABERTO= %.3f\n',b1)
o42=2*atand((-T-sqrt(T^2-4*S*U))/(2*S))
mprintf ('o42 CRUZADO= %.3f\n',o42)
o32=o42-E+180
mprintf ('o32-CRUZADO= %.3f\n',o32)
b2=abs((a*sind(o2)-c*sind(o42))/sind(o32))
mprintf ('b2-CRUZADO= %.3f\n',b2)
A)
R= -2.598
P= 0.096
Q= -4.060
S= 1.462
T= 0.192
U= -6.658
o41 ABERTO= 128.418
o31-ABERTO= 188.418
b1-ABERTO= 1.622
o42 CRUZADO= -131.120
o32-CRUZADO= -11.120
b2-CRUZADO= 22.675
B)
R= -1.000
P= -4.100
Q= -6.828
S= 5.828
T= -8.200
U= -7.828
o41 ABERTO= 128.193
o31-ABERTO= 158.193
b1-ABERTO= 6.170
o42 CRUZADO= -66.232
o32-CRUZADO= 83.768
b2-CRUZADO= 5.728
9-
clear all
clc
a=14
b=80
c=51.26
d=sqrt((64^2)+(47.5^2))
teta2=80
K1=d/a
K2=d/c
K3=(a^2-b^2+c^2+d^2)/(2*a*c)
K4=d/b
K5=(c^2-d^2-a^2-b^2)/(2*a*b)
A=cosd(teta2)-K1-K2*cosd(teta2)+K3
B=-2*sind(teta2)
C=K1-(K2+1)*cosd(teta2)+K3
D=cosd(teta2)-K1+K4*cosd(teta2)+K5
E=-2*sind(teta2)
F=K1+(K4-1)*cosd(teta2)+K5
teta3_1= 2*atand((-E- sqrt(E^2-4*D*F))/(2*D))
teta4_1= 2*atand((-B- sqrt(B^2-4*A*C))/(2*A))
mprintf("\n \n Valores dos Tetas 3 e 4 \n ")
mprintf("\n Teta3 Aberto = %.2f",teta3_1)
mprintf("\n Teta4 Aberto = %.2f",teta4_1)
valores dos tetas 3 e 4
Teta3 Aberto = 27.61
Teta4 Aberto = 97.15