1 files changed, 14 insertions, 0 deletions
diff --git a/569/CH4/EX4.14/4_14.sci b/569/CH4/EX4.14/4_14.sci
new file mode 100755
index 000000000..5e9c3a143
--- /dev/null
+++ b/569/CH4/EX4.14/4_14.sci
@@ -0,0 +1,14 @@
+// Calculate the natural  frequency 
+clc;
+wn=2*%pi*30;
+disp( 'for a frequency of 30 Hz  wn=(K/M+5*10^-3)^0.5.........(i)');
+disp('But wn=(K/M)^0.5.........(ii)');
+disp('for a frequency of 25 Hz  wn=(K/M+5*10^-3+5*10^-3)^0.5.........(iii) ')
+disp('on solving (i), (ii) and (iii)')
+M=6.36*10^-3;
+K=403.6;
+disp(M,'M=')
+disp(K,'K=')
+wn=(K/M)^0.5;
+f=wn/(2*%pi);
+disp(f,'natural frequency (Hz)')