7 files changed, 111 insertions, 0 deletions
diff --git a/3809/CH4/EX4.1/EX4_1.sce b/3809/CH4/EX4.1/EX4_1.sce
new file mode 100644
index 000000000..4027170ad
--- /dev/null
+++ b/3809/CH4/EX4.1/EX4_1.sce
@@ -0,0 +1,15 @@
+//Chapter 4, Example 4.1
+
+clc
+//Initialisation'
+c=10^-5                   //capacitance in farad
+v=10                      //voltage
+
+
+//Calculation
+q=c*v                     //charge in coulombs
+
+
+
+//Results
+printf("Charge, Q = %d uC",(q*10^6))
diff --git a/3809/CH4/EX4.2/EX4_2.sce b/3809/CH4/EX4.2/EX4_2.sce
new file mode 100644
index 000000000..043c7054a
--- /dev/null
+++ b/3809/CH4/EX4.2/EX4_2.sce
@@ -0,0 +1,19 @@
+//Chapter 4, Example 4.2
+
+clc
+//Initialisation
+eo=8.85*10^-12              //dielectric constant
+er=100                    //relative permittivity
+a=10*10^-3*25*10^-3       //area in metre
+d=7*10^-6                 //distance between plates
+
+
+
+
+//Calculation
+c=(eo*er*a)/d                  //capacitance in farad
+
+
+
+//Results
+printf("Capacitance, C = %.1f nF",c*10^9)
diff --git a/3809/CH4/EX4.3/EX4_3.sce b/3809/CH4/EX4.3/EX4_3.sce
new file mode 100644
index 000000000..a3c4c65ca
--- /dev/null
+++ b/3809/CH4/EX4.3/EX4_3.sce
@@ -0,0 +1,17 @@
+//Chapter 4, Example 4.3
+
+clc
+//Initialisation
+v=100                      //voltage
+d=10^-5                 //distance between plates
+
+
+
+
+//Calculation
+e=v/d                  //capacitance in farad
+
+
+
+//Results
+printf("Electric Field Strength, E = %d ^ 7 V/m",e*10^-6)
diff --git a/3809/CH4/EX4.4/EX4_4.sce b/3809/CH4/EX4.4/EX4_4.sce
new file mode 100644
index 000000000..ba18a4cf1
--- /dev/null
+++ b/3809/CH4/EX4.4/EX4_4.sce
@@ -0,0 +1,15 @@
+//Chapter 4, Example 4.4
+
+clc
+//Initialisation
+q=15*10**-6              //charge in coulomb
+a=200*10**-6             //area in meter
+
+
+//Calculation
+d=q/a                   //electric flux density
+
+
+
+//Results
+printf("Electric Flux Density, D = %d mC/m^2",d*10**3)
diff --git a/3809/CH4/EX4.5/EX4_5.sce b/3809/CH4/EX4.5/EX4_5.sce
new file mode 100644
index 000000000..e7054b58e
--- /dev/null
+++ b/3809/CH4/EX4.5/EX4_5.sce
@@ -0,0 +1,15 @@
+//Chapter 4, Example 4.5
+
+clc
+//Initialisation'
+c1=10*10**-6                   //capacitance in farad
+c2=25*10**-6                   //capacitance in farad
+
+
+//Calculation
+c=c1+c2                   //capacitance in farad
+
+
+
+//Results
+printf("Total Capacitance, C = %d uF",c*10**6)
diff --git a/3809/CH4/EX4.6/EX4_6.sce b/3809/CH4/EX4.6/EX4_6.sce
new file mode 100644
index 000000000..bef9d7cfc
--- /dev/null
+++ b/3809/CH4/EX4.6/EX4_6.sce
@@ -0,0 +1,15 @@
+//Chapter 4, Example 4.6
+
+clc
+//Initialisation'
+c1=10*10**-6                   //capacitance in farad
+c2=25*10**-6                   //capacitance in farad
+
+
+//Calculation
+c=(c1*c2)/(c1+c2)                   //equivalent parallel capacitance in farad
+
+
+
+//Results
+printf("Total Capacitance, C = %.2f uF",c*10**6)
diff --git a/3809/CH4/EX4.7/EX4_7.sce b/3809/CH4/EX4.7/EX4_7.sce
new file mode 100644
index 000000000..c5d6983e4
--- /dev/null
+++ b/3809/CH4/EX4.7/EX4_7.sce
@@ -0,0 +1,15 @@
+//Chapter 4, Example 4.7
+
+clc
+//Initialisation
+c=10**-5                   //capacitance in farad
+v=100                       //voltage
+
+
+//Calculation
+e=(1/2)*c*v**2                 //energy stored
+
+
+
+//Results
+printf("Energy Stored, C = %d mJ",e*10**3)