summaryrefslogtreecommitdiff
path: root/3850/CH29/EX29.3/Ex29_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3850/CH29/EX29.3/Ex29_3.sce')
-rw-r--r--3850/CH29/EX29.3/Ex29_3.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3850/CH29/EX29.3/Ex29_3.sce b/3850/CH29/EX29.3/Ex29_3.sce
new file mode 100644
index 000000000..effe0c57c
--- /dev/null
+++ b/3850/CH29/EX29.3/Ex29_3.sce
@@ -0,0 +1,22 @@
+
+//To Calculate the Work Done by a person in pulling them apart to infinite separations
+
+//Example 29.3
+
+clear;
+
+clc;
+
+Q1=10*10^-6;//First Charge in Coloumbs
+
+Q2=10*10^-6;//Second Charge in Coloumbs
+
+Q3=10*10^-6;//Third Charge in Coloumbs
+
+K=9*10^9;//Value of constant (1/(4*pi*ε0))
+
+x=0.1;//Length of side of the Equilateral Triangle in metres
+
+U=3*Q1*Q2*K/x;//Potential Energy of the System
+
+printf("The amount of work done to pull the charges apart=%f J",U);