blob: 5ac0c30b220ea3754d962f3f73d747c071fb687b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
clc
// initialization of variables
clear
d=10 //cm
t =1 //mm
T= 100 //kg-m
L=5 //m
G=8*10^5 //kg/cm^2
//calculations
r=d/2
fs=T*r*100/(r^2*2*%pi*L*t*10^-1)
U=fs^2/(2*G)
U1=U*(%pi*L*100)
// results
printf('Energy per unit volume = %.3f kg-cm/cm^3',U)
printf('\n Total strain energy= %d kg-cm',U1)
|