summaryrefslogtreecommitdiff
path: root/3648/CH15/EX15.4/Ex15_4.sce
blob: ca7d485d3570df0f1b3852c5e56b7e07492d7a7c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 15_4
clc();
clear;
//To find the resultant force on 20 micro C
f1=2 //Units in N
f2=1.8     //Units in N
theta=37       //Units in degrees
f2x=f2*cos(theta*%pi/180)      //Units in N
f2y=f2*sin(theta*%pi/180)      //Units in N
fy=f1+f2y     //Units in N
f=sqrt(fy^2+f2x^2) //Units in N
theta=atan(fy/f2x)*180/%pi  //Unitsta in degrees
printf("The resultant force is f=%.1f N \n The resultant angle is theta=%.1f degrees",f,theta)