6 files changed, 92 insertions, 0 deletions
diff --git a/3769/CH1/EX1.1/Ex1_1.sce b/3769/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..eddafe6bc
--- /dev/null
+++ b/3769/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,10 @@
+clear
+//Given
+q=4.5*10**-19                       //C
+e=1.6*10**-19                       //C
+
+//Calculation
+n=q/e
+
+//Result
+printf("\n n=  %0.1f  This value of charge is not possible",n)
diff --git a/3769/CH1/EX1.10/Ex1_10.sce b/3769/CH1/EX1.10/Ex1_10.sce
new file mode 100644
index 000000000..2f50d9c51
--- /dev/null
+++ b/3769/CH1/EX1.10/Ex1_10.sce
@@ -0,0 +1,13 @@
+clear
+//Given
+m=9*10**9
+q=5*10**-6
+r=0.1
+
+//Calculation
+//
+F=(m*q*q)/r**2
+C=2*F*cos(30)*(180/3.14)
+
+//Result
+printf("\n Force on each charge is  %0.1f *10**-1 N",C)
diff --git a/3769/CH1/EX1.14/Ex1_14.sce b/3769/CH1/EX1.14/Ex1_14.sce
new file mode 100644
index 000000000..0ee8d94a0
--- /dev/null
+++ b/3769/CH1/EX1.14/Ex1_14.sce
@@ -0,0 +1,21 @@
+clear
+//Given
+e=1.6*10**-19
+m=9*10**9
+G=6.67*10**-11
+me=9.11*10**-31
+mp=1.67*10**-27
+r=10**-10
+
+//Calculation
+F0=(m*e**2)/(G*me*mp)
+F1=(m*e**2)/(G*mp*mp)
+F2=m*e**2/r**2
+A1=F2/me
+A2=F2/mp
+
+//Result
+printf("\n (a)(i)strength of an electrons and protons %0.1f *10**39 ",F0*10**-39)
+printf("\n    (ii)Strength of two protons  %0.1f *10**36 ",F1*10**-36)
+printf("\n (b)    Acceleration of electron is  %0.1f *10**22 m/s**2",A1*10**-22)
+printf("\n       Acceleration of proton is  %0.1f *10**19 m/s*2",A2*10**-19)
diff --git a/3769/CH1/EX1.16/Ex1_16.sce b/3769/CH1/EX1.16/Ex1_16.sce
new file mode 100644
index 000000000..d7e2c5c6f
--- /dev/null
+++ b/3769/CH1/EX1.16/Ex1_16.sce
@@ -0,0 +1,15 @@
+clear
+//Given
+m=9*10**9                    //C
+q1=10*10**-6
+q2=5*10**-6
+r=0.05
+
+//Calculation
+//
+F1=m*q1*q2/r**2
+F2=m*q1*q2/r**2
+F3=sqrt(F1**2+F2**2+(2*F1*F2*cos(120)*180/3.14))
+
+//Result
+printf("\n Resultant charge is  %0.0f  N",F3*10**-1)
diff --git a/3769/CH1/EX1.18/Ex1_18.sce b/3769/CH1/EX1.18/Ex1_18.sce
new file mode 100644
index 000000000..7d4ab6d1d
--- /dev/null
+++ b/3769/CH1/EX1.18/Ex1_18.sce
@@ -0,0 +1,19 @@
+clear
+//Given
+m=9*10**9
+q1=1
+q2=100
+r=10
+q3=75                      //C
+r1=5
+
+//Calculation
+//
+F=m*q1*q2/r**2                   //along BA
+F1=m*q1*q2/r**2                   //along AC
+F2=m*q3/(sqrt(r**2-r1**2)**2)
+F3=sqrt(F1**2+F2**2)
+X=F1/F2
+
+//Result
+printf("\n Force experienced by 1 C Charge is  %0.2f  N",F3*10**-9)
diff --git a/3769/CH1/EX1.6/Ex1_6.sce b/3769/CH1/EX1.6/Ex1_6.sce
new file mode 100644
index 000000000..56311aeab
--- /dev/null
+++ b/3769/CH1/EX1.6/Ex1_6.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+q1=20                          //micro C
+q2=-5                          //micro C
+a=9*10**9
+r=0.1  
+
+//Calculation
+q=q1+q2
+q3=q/2.0
+F=(a*q3*q3)/r**2
+
+//Result
+printf("\n Force is  %0.3f  N",F*10**-13)