diff options
Diffstat (limited to '1958/CH3/EX3.4')
-rwxr-xr-x | 1958/CH3/EX3.4/Chapter3_example4.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1958/CH3/EX3.4/Chapter3_example4.sce b/1958/CH3/EX3.4/Chapter3_example4.sce new file mode 100755 index 000000000..b5e6a86ad --- /dev/null +++ b/1958/CH3/EX3.4/Chapter3_example4.sce @@ -0,0 +1,12 @@ +clc
+clear
+//Input data
+l=0.8//Length of a simple pendulum in m
+q=30//Angle with the vertical through which the bob is released in degrees
+q1=10//Required angle in degrees
+
+//Calculations
+v=sqrt(2*9.8*l*(cosd(q1)-cosd(q)))//Speed in m/s
+
+//Output
+printf('Speed when the bob is at the angle of %i degrees with the vertical is %3.2f m/s',q1,v)
|