summaryrefslogtreecommitdiff
path: root/3755/CH10/EX10.18/Ex10_18.sce
blob: cc8a592ecd6a468274423fadd45e8f581e15cfee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clear
//
//
//

//Variable declaration    
epsilonr=5.6;       //dielectric constant
n=1.5;

//Calculations
x=(epsilonr+2)/(epsilonr-1);
y=(n^2-1)/(n^2+2);
alpha=(1-(x*y))*100;       //percentage of ionic polarizability

//Result
printf("\n percentage of ionic polarizability is %0.1f percentage",alpha)