1 files changed, 29 insertions, 0 deletions
diff --git a/1026/CH5/EX5.2/Example5_2.sce b/1026/CH5/EX5.2/Example5_2.sce
new file mode 100755
index 000000000..be7b20a5a
--- /dev/null
+++ b/1026/CH5/EX5.2/Example5_2.sce
@@ -0,0 +1,29 @@
+//chapter5,Example5_2,pg 97
+
+V=3000
+
+T1=3.5//reverberation time
+
+A=(0.161*V)/T1
+
+l=20
+
+b=15
+
+h=10
+
+S=2*((l*b)+(b*h)+(h*l))
+
+sum_a=A/S
+
+am=0.5
+
+a=0.106
+
+T2=2.5//reverberation time after cloth use
+
+S1=(((0.161*V)/(am-a))*((1/T2)-(1/T1)))
+
+printf("area of wall covered by curtain cloth\n")
+
+printf("S1=%.3f sq.m",S1)
+\ No newline at end of file