summaryrefslogtreecommitdiff
path: root/3669/CH14/EX14.1/1.sce
blob: 7a9c090877371604b271a5e5475e54598393a568 (plain)
1
2
3
4
5
6
7
8
9
10
11
12

//Variable declaration
I1=10;     //intensity(w/m**2)
I2=25;     //intensity(w/m**2)

//Calculation
a1bya2=sqrt(I1/I2);    
I=((1+a1bya2)**2)/((a1bya2-1)**2);    //ratio of maximum intensity to minimum intensity

//Result
printf('ratio of maximum intensity to minimum intensity is %0.3f     \n',(I))
printf('answer varies due to approximating off errors\n')