diff options
Diffstat (limited to '3756/CH9/EX9.1/Ex9_1.sce')
| -rw-r--r-- | 3756/CH9/EX9.1/Ex9_1.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3756/CH9/EX9.1/Ex9_1.sce b/3756/CH9/EX9.1/Ex9_1.sce new file mode 100644 index 000000000..fb6f83c63 --- /dev/null +++ b/3756/CH9/EX9.1/Ex9_1.sce @@ -0,0 +1,19 @@ +clc +// +// +// + +//Variable declaration +k=3 +E0=8.854*10**-12 +E=10**6 + +//Calculations +P=(E0*(k-1)*E)*10**6 +D=(E0*k*E)*10**6 +Ed=0.5*E0*k*(E**2) + +//Result +printf("\n (a) The Polarization in the Dielectric is %2.2f *10**-6 coul/m**2",P) +printf("\n (b) The Displacement Current Density is %2.2f *10**-6 coul/m**2",D) +printf("\n (c) The Energy Density is %0.3f J/m**3",Ed) |