summaryrefslogtreecommitdiff
path: root/377/CH3/EX3.4/3_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '377/CH3/EX3.4/3_4.sce')
-rw-r--r--377/CH3/EX3.4/3_4.sce6
1 files changed, 6 insertions, 0 deletions
diff --git a/377/CH3/EX3.4/3_4.sce b/377/CH3/EX3.4/3_4.sce
new file mode 100644
index 000000000..726d85eb3
--- /dev/null
+++ b/377/CH3/EX3.4/3_4.sce
@@ -0,0 +1,6 @@
+disp(" % ionic character = (1-exp((-1/4)*(Xa-Xb)^2))*100");
+Xa1=1.8;Xb1=2.2;Xa2=1.7;Xb2=2.5;
+a = (1-exp((-1/4)*((Xa1-Xb1)^2)))*100;
+b = (1-exp((-1/4)*((Xa2-Xb2)^2)))*100;
+printf('\n For GaAs,percent ionic character=%f',a);
+printf('\n For ZnSe,percent ionic character=%f',b); \ No newline at end of file