1 files changed, 10 insertions, 0 deletions
diff --git a/3020/CH4/EX4.12/ex4_12.sce b/3020/CH4/EX4.12/ex4_12.sce
new file mode 100755
index 000000000..e35efed82
--- /dev/null
+++ b/3020/CH4/EX4.12/ex4_12.sce
@@ -0,0 +1,10 @@
+clc;
+clear all;
+s = 1.4; // Area of window in square meters
+b = 60; // Intensity level of window in Db
+I0 = 1e-12; // Standard intensity in watts per square meters
+//60=10log10(I1/1e-12);
+//so..
+I1=I0*1e6;// Intensity of sound in watts per square meters
+p = I1*s;//The acoustic power entering via window
+disp('watts',p,'The acoustic power entering via window is')