summaryrefslogtreecommitdiff
path: root/2855/CH1/EX1.13/Ex1_13.sce
blob: f397c1c8ad63f47fe58bd78b427428c5ffa41490 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Example no 1-13
//page no. 27
clc;
clear;
//I1/I0=cos(w)^2
//Given I1/I0=0.55

k=sqrt(0.55);  //from above formulae
printf("\n cos w is %0.2f ",k);
printf("\n The angle bw polarizer and analyser , w is %0.0f degree",acos(k)*180/%pi);//Result