summaryrefslogtreecommitdiff
path: root/3020/CH21/EX21.1/ex21_1.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3020/CH21/EX21.1/ex21_1.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '3020/CH21/EX21.1/ex21_1.sce')
-rwxr-xr-x3020/CH21/EX21.1/ex21_1.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3020/CH21/EX21.1/ex21_1.sce b/3020/CH21/EX21.1/ex21_1.sce
new file mode 100755
index 000000000..6dd23b579
--- /dev/null
+++ b/3020/CH21/EX21.1/ex21_1.sce
@@ -0,0 +1,11 @@
+clc;
+clear all;
+Lt=0.629e-9;//lettice parameter of KCL
+xk=1.264*1e-40;//electronic polarisability of K+ in F m^2
+xcl=3.408*1e-40;//electronic polarisability of Cl- in F m^2
+xKCL=xk+xcl;//electronic polarisability of KCl in F m^2
+n=4;//no of atoms
+N=n/(Lt^3);//no of dipoles per m^3
+e0=8.854e-12;
+er=(N*xKCL/e0)+1;//dielectric constant of KCL
+disp('',er,'dielectric constant of KCL is:')