diff options
Diffstat (limited to '1985/CH1/EX1.1')
-rwxr-xr-x | 1985/CH1/EX1.1/chapter1_Example1.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1985/CH1/EX1.1/chapter1_Example1.sce b/1985/CH1/EX1.1/chapter1_Example1.sce new file mode 100755 index 000000000..8efba1eb1 --- /dev/null +++ b/1985/CH1/EX1.1/chapter1_Example1.sce @@ -0,0 +1,14 @@ +
+clc
+clear
+
+//INPUT DATA
+L=1;//Length of the bar in m
+l=0.25;//Length of the pemdulum in m
+
+//CALCULATIONS
+k=sqrt((L^2)/12);//Radius of gyration m
+T=sqrt(((k^2/l)+l)/9.8)*2*3.14;//Time period of pendulum in s
+
+//OUTPUT
+mprintf('Time period of the pendulum is %3.3f sec',T)
|