diff options
Diffstat (limited to '2381/CH5/EX5.16')
| -rwxr-xr-x | 2381/CH5/EX5.16/ex_16.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/2381/CH5/EX5.16/ex_16.sce b/2381/CH5/EX5.16/ex_16.sce new file mode 100755 index 000000000..696f6d87d --- /dev/null +++ b/2381/CH5/EX5.16/ex_16.sce @@ -0,0 +1,15 @@ +//Example 16 // Pressure amplitude, Energy density and energy flux +clc; +clear; +close; +//given data : +a=10^-5;// in m +n=500;// in per sec +p=1.29;// in kg/m^3 +v=340;// in m/s +Pa=2*%pi*a*n*v*p; +disp(Pa,"(i).Pressure amplitude,Pa(N/m^2) = ") +Ed=2*%pi^2*a^2*n^2*p; +disp(Ed,"(ii). Energy density,Ed(J/m^3) = ") +Ef=2*%pi^2*a^2*n^2*p*v; +disp(Ef,"(iii). The energy flux,Ef(J/m^2-s) = ") |