diff options
Diffstat (limited to '1991/CH2/EX2.17')
-rwxr-xr-x | 1991/CH2/EX2.17/17.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1991/CH2/EX2.17/17.sce b/1991/CH2/EX2.17/17.sce new file mode 100755 index 000000000..d751fc0f3 --- /dev/null +++ b/1991/CH2/EX2.17/17.sce @@ -0,0 +1,13 @@ +clc
+clear
+//input
+v=15//velocity
+m=70//mass
+r=50//radius
+//calculation
+x=v*v/(r*10)//applying parallelogram of vectors,then for equilibrium
+y=atand(x)
+r1=(m*10)/cosd(y)
+//output
+printf("the inclination is %3.3f deg",y)
+printf("\n the reaction is %3.3f N",r1)
|