summaryrefslogtreecommitdiff
path: root/3862/CH1/EX1.6/Ex1_6.sce
blob: dcf86caf5a047cdb34857246763cfafe844c42e9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clear
//Let ABC  be the triangle of forces,'theta' be the angle between F1 and F2, and 'alpha' be the angle between resultant and F1 

//

//variable declaration
cnv= 180/%pi 
F1=(400)                         //all forces are in newtons,'N'
F2=(260)
R=(520)

//calculations

theta=acos(((R**2)-(F1**2)-(F2**2))/(2*F1*F2))*cnv

alpha=asin(F2*sin(theta*%pi/180)/R)*cnv

printf("\n theta= %0.2f  °",theta)
printf("\n alpha= %0.2f  °",alpha)