summaryrefslogtreecommitdiff
path: root/1928/CH4/EX4.15.5
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1928/CH4/EX4.15.5
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1928/CH4/EX4.15.5')
-rwxr-xr-x1928/CH4/EX4.15.5/ex_4_15_5.sce31
1 files changed, 31 insertions, 0 deletions
diff --git a/1928/CH4/EX4.15.5/ex_4_15_5.sce b/1928/CH4/EX4.15.5/ex_4_15_5.sce
new file mode 100755
index 000000000..5c76f990f
--- /dev/null
+++ b/1928/CH4/EX4.15.5/ex_4_15_5.sce
@@ -0,0 +1,31 @@
+//Chapter-4,Example4_15_5,pg 4-27
+
+l=20 //length of room
+
+b=12 //bredth of room
+
+h=12 //height of room
+
+V=l*b*h //volume of room
+
+S=2*(l*b+b*h+h*l) //surface area of hall
+
+T1=2.5 //Reverberation time
+
+a=(0.161*V)/(T1*S) //using Sabine's formula
+
+printf("1) average absorption coefficient =")
+
+disp(a)
+
+a1=0.5 //absorption coefficient
+
+T2=2 //Reverberation time
+
+S1=(0.161*V/(a1-a))*(1/T2-1/T1)
+
+printf("2) carpet area required =")
+
+disp(S1)
+
+printf("m^2")