summaryrefslogtreecommitdiff
path: root/1367/CH3/EX3.5/3_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '1367/CH3/EX3.5/3_5.sce')
-rwxr-xr-x1367/CH3/EX3.5/3_5.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1367/CH3/EX3.5/3_5.sce b/1367/CH3/EX3.5/3_5.sce
new file mode 100755
index 000000000..46d28c1a8
--- /dev/null
+++ b/1367/CH3/EX3.5/3_5.sce
@@ -0,0 +1,13 @@
+//Find Dipole moment and Percentage ionic character
+//Ex:3.5
+clc;
+clear;
+close;
+d=0.9178;//molecular distance in angstorm
+d1=d*10^-10;//in m
+e=1.602*10^-19;//in C
+dm=e*d1;//dipole moment in fully ionic state in Cm
+disp(dm,"Dipole moment of HF in fully ionic state (in Cm) = ");
+dm_m=6.375*10^-30;//meaured dipole moment in Cm
+p=(dm_m*100)/dm;//Percentage ionic character
+disp(p,"Percentage ionic character");