summaryrefslogtreecommitdiff
path: root/3647/CH6/EX6.5/Ex6_5.sce
blob: d58c3db577e958b96815a100507e6992c3f0cab4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Solutions to Problems In applied mechanics
//A N Gobby
clear;

clc
//initialisation of variables
v=4//in
w=20//tonf
d=10//ft
m=13400//tonf/in^2
q=2//in
l=120//in
//CALCULATIONS
Fmax=q*(w)/(%pi/v*v^2)//tonf/in^2
M=Fmax*l/m//in
P=w*M//in tonf
//RESULTS
printf('The maximum instantneous stress=% f tonf/in^2',Fmax)
printf('The maximum elongation is=% f in',M)
printf('the strain energy stored=% f in tonf',P)