diff options
Diffstat (limited to '3828/CH3/EX3.1/Ex3_1.sce')
| -rw-r--r-- | 3828/CH3/EX3.1/Ex3_1.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3828/CH3/EX3.1/Ex3_1.sce b/3828/CH3/EX3.1/Ex3_1.sce new file mode 100644 index 000000000..1e32738c8 --- /dev/null +++ b/3828/CH3/EX3.1/Ex3_1.sce @@ -0,0 +1,12 @@ +//Chapter 3 : Polarization + +clear; + +//Variable declaration +theta=(60*%pi/180) //angle in radians + +//Calculations +Intensityred=100-(1-cos(theta)**2)*100 + +//Result +mprintf("Percentage of light that passes through = %d percent",Intensityred) |