summaryrefslogtreecommitdiff
path: root/680/CH4/EX4.02/4_02.sce
blob: 7d8c664ea8ce797f84b3d3cac10e1eb6fb390335 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Problem 4.02:

//initializing the variables:
mdt = 0.15; // in kg/sec
v = 420; // in m/sec

//calculation:
vxin = v
vxout = 0
vyin = 0
vyout = v
Fxgc = mdt*(vxout - vxin)
Fygc = mdt*(vyout - vyin)
Fres = (Fxgc^2 + Fygc^2)^0.5
theta = (atan(Fygc/Fxgc))*180/%pi + 180

printf("\n\nResult\n\n")
printf("\n resultant supporting force is %.1f N and direction is %.0f degree",Fres,theta)