1 files changed, 14 insertions, 0 deletions
diff --git a/2084/CH16/EX16.13w/16_13w.sce b/2084/CH16/EX16.13w/16_13w.sce
new file mode 100755
index 000000000..77fa0d8b4
--- /dev/null
+++ b/2084/CH16/EX16.13w/16_13w.sce
@@ -0,0 +1,14 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 16.13w
+//calculation of the length of the closed pipe
+
+//given data
+l0=60*10^-2//length(in m) of the open pipe
+
+//calculation
+//from the equation of the resonate frequency of the closed organ pipe....l=(n*v)/(4*nu)
+l1=l0/4
+
+printf('the length of the closed pipe is %d cm',l1*10^2)