2 files changed, 17 insertions, 0 deletions
diff --git a/24/CH43/EX43.1/Example43_1.sce b/24/CH43/EX43.1/Example43_1.sce
new file mode 100755
index 000000000..0f04925de
--- /dev/null
+++ b/24/CH43/EX43.1/Example43_1.sce
@@ -0,0 +1,15 @@
+//Given that
+e = 1.6*10^-19  //ev to joule conversion
+E = 5.30*10^6*e  //in Joules
+n = 79  //number of protons
+
+//Sample Problem 43-1
+txt = mopen('Example43_1_result.txt','wt')
+mfprintf(txt, '**Sample Problem 43-1**\n')
+K = 9*10^9  //in SI unit
+q1 = 2*e
+q2 = n*e
+//K*q1*q2/d = E
+d = K*q1*q2/E
+mfprintf(txt, 'The distance of the alpha particles from gold nucleus is equal to %em', d)
+mclose(txt)
+\ No newline at end of file
diff --git a/24/CH43/EX43.1/Example43_1_result.txt b/24/CH43/EX43.1/Example43_1_result.txt
new file mode 100755
index 000000000..de3470e84
--- /dev/null
+++ b/24/CH43/EX43.1/Example43_1_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 43-1**
+The distance of the alpha particles from gold nucleus is equal to 4.292830e-014m
+\ No newline at end of file