Caratulas Pucp
Caratulas Pucp
Caratulas Pucp
Escuela de Posgrado
Maestra de Ingeniera Civil
MECNICA ESTRUCTURAL
Profesor:
Mg. Jos Acero Martnez
Alumnos:
Lopez Otiniano Stewart
(20163701)
(20154087)
a/2
-a/2
-a
-a/2
a/2
close all
clc
% ESFUERZOS CORTANTES POR TORSION
% Por Jhonatan Sedano-Maestra en Ingeniera Civil PUCP
syms a P
aa=input('Ingrese 0.5 ancho:');
bb=input('Ingrese 0.5 alto:');
v=0.30;
E=210000;%en kg/cm2
G=E/(2*(1+v));
taoxz=-16*G*theta*aa/pi^2*a5;
taoyz=2*G*theta*x-(16*G*theta*aa/pi^2*a6);
taoxz=vpa(taoxz,5);
taoyz=vpa(taoyz,5);
pretty(taoxz);
pretty(taoyz);
end
PUNTO
xz
yz,
-0.80802
P/a2
-0.17505
P/a2
0.17505 P/a2
0.80802 P/a2
-1.0168 P/a2
1.0168 P/a2