diff options
Diffstat (limited to '49/CH6/EX6.9/ex9.sce')
-rwxr-xr-x | 49/CH6/EX6.9/ex9.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/49/CH6/EX6.9/ex9.sce b/49/CH6/EX6.9/ex9.sce new file mode 100755 index 000000000..1a846c6de --- /dev/null +++ b/49/CH6/EX6.9/ex9.sce @@ -0,0 +1,10 @@ +//CHAPTER 6 _ PRESSURE AND SOUND MEASUREMENT
+//Caption : Sound Measurement
+// Example 9// Page 369
+disp("Lp=104")
+Lp=104 //('enter the sound pressure level in decibles=:')
+disp("pa=20*10^-6;")
+disp("p=sqrt(10^(Lp/10)*pa^2);")
+pa=20*10^-6; // rms pressure threshold of hearing
+p=sqrt(10^(Lp/10)*pa^2);
+printf('root mean square sound pressure is %1.3fPa\n',p)
|