summaryrefslogtreecommitdiff
path: root/3755/CH14/EX14.4/Ex14_4.sce
blob: 98916f6109eb6b12d40af4d64463ca438c62fd42 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clear
//
//
//

//Variable declaration    
I0=10^-12;      //standard intensity level(watt/m^2)
A=1.4;     //area(m^2)
il=60;     //intensity level(decibels)

//Calculations
x=10^(il/10);
I=x*10^-12;      //intensity level(watt/m^2)
Ap=I*A;      //acoustic power(watt)

//Result
printf("\n acoustic power is %e watt",Ap)
printf("\n answer in the book is wrong")