diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /3492/CH7/EX7.2/Ex7_2.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '3492/CH7/EX7.2/Ex7_2.sce')
| -rw-r--r-- | 3492/CH7/EX7.2/Ex7_2.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/3492/CH7/EX7.2/Ex7_2.sce b/3492/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..68abb4f36 --- /dev/null +++ b/3492/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,21 @@ +clc
+//Chapter7
+//Ex_2
+//Given
+N=5*10^28 //in m^-3
+e=1.6*10^-19 // in coulombs
+Z=4
+me=9.1*10^-31 //in Kg
+epsilon_o=8.85*10^-12//F/m2
+epsilon_r=11.9
+//part(a)
+alpha_e=(3*epsilon_o/N)*((epsilon_r-1)/(epsilon_r+2))
+disp(alpha_e,"Electronic polarizability in F/m2")
+//part(b)
+//let x=E_loc/E
+x=(epsilon_r+2)/3
+printf("Local field is a factor of %f greater than applied field",x)
+//part(c)
+wo=sqrt(Z*e^2/(me*alpha_e))
+fo=wo/(2*%pi)
+disp(fo,"resonant frequency in Hz is")
|