summaryrefslogtreecommitdiff
path: root/1085/CH14/EX14.4/ex14_4.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1085/CH14/EX14.4/ex14_4.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 '1085/CH14/EX14.4/ex14_4.sce')
-rwxr-xr-x1085/CH14/EX14.4/ex14_4.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1085/CH14/EX14.4/ex14_4.sce b/1085/CH14/EX14.4/ex14_4.sce
new file mode 100755
index 000000000..7b9db3cb3
--- /dev/null
+++ b/1085/CH14/EX14.4/ex14_4.sce
@@ -0,0 +1,11 @@
+//Exam:14.4
+clc;
+clear;
+close;
+C=10^(-9);//capacitance(in F)
+d=2*10^(-3);//distance of separation in a parallel plate condenser
+E_o=8.854*10^(-12);//dielectric constant
+A=(10*10^(-3))*(10*10^(-3));//area of parallel plate condenser
+//C=E_o*E_r*A/d
+E_r=C*d/(E_o*A);//Relative dielectric constant
+disp(ceil(E_r),'Relative dielectric constant of a barium titanate crystal') \ No newline at end of file