summaryrefslogtreecommitdiff
path: root/3647/CH7/EX7.3/Ex7_3.sce
blob: 337f4a4276b9893015b6cf4bf1daf47645f68b9b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Solutions to Problems In applied mechanics
//A N Gobby
clear all;

clc
//initialisation of variables
p=8//ft
h=2//tonf/ft
a=3//tons/ft
b=11//ft
w=b*h//tonf
//CALCULATIONS
S=(h*b^2/h)/p//tonf
R=w-S//tonf
x=R/h//ft
M=(R*x)-((h*(x^2))/h)//tonf ft
N=-(h*a^2/h)//tonf ft
//RESULTS
printf('the maximum bending moment occurs=% f tonf ft',N)