summaryrefslogtreecommitdiff
path: root/1760/CH1
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1760/CH1
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1760/CH1')
-rwxr-xr-x1760/CH1/EX1.1/EX1_1.sce8
-rwxr-xr-x1760/CH1/EX1.11/EX1_11.sce12
-rwxr-xr-x1760/CH1/EX1.13/EX1_13.sce5
-rwxr-xr-x1760/CH1/EX1.14/EX1_14.sce8
-rwxr-xr-x1760/CH1/EX1.15/EX1_15.sce17
-rwxr-xr-x1760/CH1/EX1.16/EX1_16.sce16
-rwxr-xr-x1760/CH1/EX1.17/EX1_17.sce8
-rwxr-xr-x1760/CH1/EX1.18/EX1_18.sce5
-rwxr-xr-x1760/CH1/EX1.19/EX1_19.sce6
-rwxr-xr-x1760/CH1/EX1.2/EX1_2.sce8
-rwxr-xr-x1760/CH1/EX1.20/EX1_20.sce14
-rwxr-xr-x1760/CH1/EX1.21/EX1_21.sce8
-rwxr-xr-x1760/CH1/EX1.26/EX1_26.sce7
-rwxr-xr-x1760/CH1/EX1.27/EX1_27.sce10
-rwxr-xr-x1760/CH1/EX1.28/EX1_28.sce4
-rwxr-xr-x1760/CH1/EX1.29/EX1_29.sce9
-rwxr-xr-x1760/CH1/EX1.3/EX1_3.sce9
-rwxr-xr-x1760/CH1/EX1.30/EX1_30.sce13
-rwxr-xr-x1760/CH1/EX1.32/EX1_32.sce9
-rwxr-xr-x1760/CH1/EX1.33/EX1_33.sce9
-rwxr-xr-x1760/CH1/EX1.34/EX1_34.sce6
-rwxr-xr-x1760/CH1/EX1.35/EX1_35.sce25
-rwxr-xr-x1760/CH1/EX1.36/EX1_36.sce20
-rwxr-xr-x1760/CH1/EX1.37/EX1_37.sce11
-rwxr-xr-x1760/CH1/EX1.38/EX1_38.sce12
-rwxr-xr-x1760/CH1/EX1.39/EX1_39.sce10
-rwxr-xr-x1760/CH1/EX1.4/EX1_4.sce26
-rwxr-xr-x1760/CH1/EX1.40/EX1_40.sce5
-rwxr-xr-x1760/CH1/EX1.41/EX1_41.sce5
-rwxr-xr-x1760/CH1/EX1.42/EX1_42.sce7
-rwxr-xr-x1760/CH1/EX1.44/EX1_44.sce6
-rwxr-xr-x1760/CH1/EX1.46/EX1_46sce.sce9
-rwxr-xr-x1760/CH1/EX1.47/EX1_47.sce10
-rwxr-xr-x1760/CH1/EX1.48/EX1_48.sce10
-rwxr-xr-x1760/CH1/EX1.5/EX1_5.sce11
-rwxr-xr-x1760/CH1/EX1.50/EX1_50.sce6
-rwxr-xr-x1760/CH1/EX1.51/EX1_51.sce5
-rwxr-xr-x1760/CH1/EX1.52/EX1_52.sce11
-rwxr-xr-x1760/CH1/EX1.53/EX1_53.sce7
-rwxr-xr-x1760/CH1/EX1.6/EX1_6.sce15
-rwxr-xr-x1760/CH1/EX1.7/EX1_7.sce14
41 files changed, 416 insertions, 0 deletions
diff --git a/1760/CH1/EX1.1/EX1_1.sce b/1760/CH1/EX1.1/EX1_1.sce
new file mode 100755
index 000000000..3ca981d6f
--- /dev/null
+++ b/1760/CH1/EX1.1/EX1_1.sce
@@ -0,0 +1,8 @@
+ //CHAPTER1 EX 1-1 PG NO 17
+L=5*10^-3; //length
+B=2*10^-2; //breath
+A=(5*10^-3)*(2*10^-2); //area
+P=1.72*10^-5 ; //resistivity of copper
+R=P*L/A; //resistance of copper
+disp('i) resistance = '+string (R)+' ohm');
+R=P*L/A; //resistance in ohm
diff --git a/1760/CH1/EX1.11/EX1_11.sce b/1760/CH1/EX1.11/EX1_11.sce
new file mode 100755
index 000000000..941de13e3
--- /dev/null
+++ b/1760/CH1/EX1.11/EX1_11.sce
@@ -0,0 +1,12 @@
+ //EXAMPLE 1-11 PG NO-21
+R55=58; //resistance
+R15=50; //Resistance
+T1=55; //Temperature
+T2=15; //Temperature
+A15=[(R55/R15)-1]/(T1-T2); //alpha 15
+disp('i) ALPHA (A15) = '+string (A15)+' ');
+T3=0;
+A2=A15/[1+A15*(T3-T2)]; //Alpha 2
+disp('ii) ALPHA (A2) = '+string (A2)+' ');
+
+
diff --git a/1760/CH1/EX1.13/EX1_13.sce b/1760/CH1/EX1.13/EX1_13.sce
new file mode 100755
index 000000000..8b9c6f7bc
--- /dev/null
+++ b/1760/CH1/EX1.13/EX1_13.sce
@@ -0,0 +1,5 @@
+ //EXAMPLE 1-13 PG NO 21-22
+R=10; //RESISTANCE
+V=230; //VOLTAGE
+P=(V*V)/R; //POWER
+disp('i) POWER = '+string (P)+' W')
diff --git a/1760/CH1/EX1.14/EX1_14.sce b/1760/CH1/EX1.14/EX1_14.sce
new file mode 100755
index 000000000..19b9d60bb
--- /dev/null
+++ b/1760/CH1/EX1.14/EX1_14.sce
@@ -0,0 +1,8 @@
+ //EXAMPLE 1-14 PG NO-22
+R1=4; //Resistance
+R2=2; //Resistance
+R3=8; //Resistance
+RS=R1+R2; //resistance When Point A&B is short circuit
+disp('i)resistance When Point A&B is short circuit = '+string (RS)+' ohm');
+RO=R1+R2+R3; //resistance When Point A&B is open circuit
+disp('i)resistance When Point A&B is open circuit = '+string (RO)+' ohm');
diff --git a/1760/CH1/EX1.15/EX1_15.sce b/1760/CH1/EX1.15/EX1_15.sce
new file mode 100755
index 000000000..9d5e77fc4
--- /dev/null
+++ b/1760/CH1/EX1.15/EX1_15.sce
@@ -0,0 +1,17 @@
+ //EXAMPLE 1-15 PG NO-22
+I1=0.04; //CURRENT
+I2=0.01; //CURRENT
+V1=200; //VOLTAGE
+R=V1/I1; //Resistance
+disp('i)resistance (R) = '+string (R)+' ohm');
+V2=10; //VOLTAGE
+I3=50; //CURRENT
+A=0.1; //AMMETER RESISTANCE
+R1=(V2/I3)-0.1;
+disp('i)Resistance (R1) = '+string (R1)+' ohm');
+V3=5000;
+V4=250;
+I=I3/V3;
+disp('i)Current (I) = '+string (I)+' A');
+R2=(V4-I3)/I;
+disp('i)resistance (R2) = '+string (R2)+' ohm');
diff --git a/1760/CH1/EX1.16/EX1_16.sce b/1760/CH1/EX1.16/EX1_16.sce
new file mode 100755
index 000000000..c3b2022b1
--- /dev/null
+++ b/1760/CH1/EX1.16/EX1_16.sce
@@ -0,0 +1,16 @@
+ //EXAMPLE 1-16 PG NO-23
+V=1; //ASSUMING
+t=1; //ASSUMING
+R1=30; //RESISTANCE
+R2=20;
+R3=10;
+E30=(V/R1)*t; //ENERGY AT 30 ohm RESISTANCE
+disp('i) ENERGY = '+string (E30)+' ');
+E20=(V/R2)*t; //ENERGY AT 20 ohm RESISTANCE
+disp('ii) ENERGY = '+string (E20)+' ');
+E10=(V/R3)*t; //ENERGY AT 10 ohm RESISTANCE
+disp('iii) ENERGY = '+string (E10)+' ');
+TE=E30+E20+E10; //TOTAL ENERGY
+disp('iv) TOTAL ENERGY = '+string (TE)+' ');
+PTE=(E30/TE)*100; //PERCENTAGE OF TOTAL ENERGY
+disp('ii) PERCENTAGE OF TOTAL ENERGY = '+string (PTE)+'% ');
diff --git a/1760/CH1/EX1.17/EX1_17.sce b/1760/CH1/EX1.17/EX1_17.sce
new file mode 100755
index 000000000..f74260575
--- /dev/null
+++ b/1760/CH1/EX1.17/EX1_17.sce
@@ -0,0 +1,8 @@
+ //EXAMPLE 1-17 PG NO-23
+N=10^3; //Number of Turns
+a=6.25*10^-4; //Diameter
+l=0.25;
+L=(N*N*4*%pi*10^-7*a)/(%pi*l); //INDUCTANCE
+disp('i)inductance = '+string (L)+' H');
+e=L*100; //EMF
+disp('ii)EMF = '+string (e)+' V')
diff --git a/1760/CH1/EX1.18/EX1_18.sce b/1760/CH1/EX1.18/EX1_18.sce
new file mode 100755
index 000000000..54cf4666c
--- /dev/null
+++ b/1760/CH1/EX1.18/EX1_18.sce
@@ -0,0 +1,5 @@
+ //EXAMPLE 1-18 PG NO-23
+E=0.05; //ENERGY
+i=0.1; //CURRENT
+L=2*E/i^2 //INDUCTANCE OF COIL
+disp('i)inductance = '+string (L)+' H')
diff --git a/1760/CH1/EX1.19/EX1_19.sce b/1760/CH1/EX1.19/EX1_19.sce
new file mode 100755
index 000000000..dd8611a2d
--- /dev/null
+++ b/1760/CH1/EX1.19/EX1_19.sce
@@ -0,0 +1,6 @@
+ //EXAMPLE 1-19 PG NO 23
+i=0.184 //derivative of I
+e=0.16;
+L=e/i; //Inductance
+disp('i)Inductance = '+string (L)+' H')
+
diff --git a/1760/CH1/EX1.2/EX1_2.sce b/1760/CH1/EX1.2/EX1_2.sce
new file mode 100755
index 000000000..d727de114
--- /dev/null
+++ b/1760/CH1/EX1.2/EX1_2.sce
@@ -0,0 +1,8 @@
+ //EXAMPLE 1-2 PG NO 18
+R=0.69; //RESISTANCE
+P=2.83*10^-8; //PRO
+L=60; //LENGTH OF CABLE
+a=(P*L)/R;
+disp('i) a = '+string (a)+' m^2');
+D=[(4*a)/%pi]^0.5; //DIAMETER
+disp('i) DIAMETER = '+string (D)+' mm');
diff --git a/1760/CH1/EX1.20/EX1_20.sce b/1760/CH1/EX1.20/EX1_20.sce
new file mode 100755
index 000000000..16fa0ff3c
--- /dev/null
+++ b/1760/CH1/EX1.20/EX1_20.sce
@@ -0,0 +1,14 @@
+ //EXAMPLE 1-20 PG NO-24
+A=20*10^-6;
+L=30;
+P20=1.72*10^-8;
+R20=P20*L/A;
+X0=0.00426;
+I=5;
+X20=X0/[1+(X0*20)];
+R55=R20*(1+X20*(55-20));
+P=I*I*R55;
+disp('i)RESISTANCE = '+string (R20)+' ohm');
+disp('i) ALPHA 20(X20)= '+string(X20)+' ohm');
+disp('i)RESISTANCE = '+string (R55)+' ohm')
+disp('i)POWER = '+string (P)+' w')
diff --git a/1760/CH1/EX1.21/EX1_21.sce b/1760/CH1/EX1.21/EX1_21.sce
new file mode 100755
index 000000000..4893e5cbc
--- /dev/null
+++ b/1760/CH1/EX1.21/EX1_21.sce
@@ -0,0 +1,8 @@
+ //EXAMPLE 1-21 PG NO-24
+L=200*10^-3; //INDUCTAR
+t1=1; //di/dt=(-2e^-t+4e^-2t)=-1.9*10^-7;
+V=L*(-1.94*10^-7); //VOLTAGE AT TIME 1
+disp('i) Voltage = '+string (V)+'V ');
+t2=0.1; //di/dt=(-2e^-t+4e^-2t)^2=0.216;
+V1=L*0.5*(0.216); //VOLTAGE AT TIME O.1
+disp('ii) Voltage = '+string (V1)+'V ');
diff --git a/1760/CH1/EX1.26/EX1_26.sce b/1760/CH1/EX1.26/EX1_26.sce
new file mode 100755
index 000000000..3fd53db73
--- /dev/null
+++ b/1760/CH1/EX1.26/EX1_26.sce
@@ -0,0 +1,7 @@
+ //EXAMPLE 1-26 PG NO 27
+L1=(1.1-0.8)/0.75; //Inductance
+disp('i)Inductance = '+string (L1)+' H')
+L2=3*L1; //Inductance
+disp('ii)Inductance = '+string (L2)+' H')
+
+
diff --git a/1760/CH1/EX1.27/EX1_27.sce b/1760/CH1/EX1.27/EX1_27.sce
new file mode 100755
index 000000000..75eb95e65
--- /dev/null
+++ b/1760/CH1/EX1.27/EX1_27.sce
@@ -0,0 +1,10 @@
+ //EXAMPLE 1-27 PG NO27
+L1=50*10^-3; // Inductar
+L2=100*10^-3; //Inductar
+X=(L1/L2);
+disp('i) (L1/L2) = '+string (X)+' ')
+Q1+Q2=600;
+Q11=200; //flux
+Q22=400 //flux
+disp('ii) Flux Q11 = '+string (Q11)+' mWb');
+disp('iii) Flux Q22 = '+string (Q22)+' mWb');
diff --git a/1760/CH1/EX1.28/EX1_28.sce b/1760/CH1/EX1.28/EX1_28.sce
new file mode 100755
index 000000000..f557fc0f5
--- /dev/null
+++ b/1760/CH1/EX1.28/EX1_28.sce
@@ -0,0 +1,4 @@
+ //EXAMPLE 1-28 PG NO-27
+C1=60; //TWO CAPACITOR CONNECTED IN SERIES
+EC=(C1*C1)/(C1+C1); //EQUIVALENT CAPACITOR
+disp('i) Equivalent Cpacitor (EC) is = '+string (EC) +' microF ');
diff --git a/1760/CH1/EX1.29/EX1_29.sce b/1760/CH1/EX1.29/EX1_29.sce
new file mode 100755
index 000000000..a5f96c95f
--- /dev/null
+++ b/1760/CH1/EX1.29/EX1_29.sce
@@ -0,0 +1,9 @@
+ //EXAMPLE 1-29 PG NO-27-28
+C1=12; //CAPACITOR
+C2=4; //CAPACITOR
+C3=8;
+C4=7;
+C1=(C1*C2)/(C1+C2); //CAPACITOR IN SEREIS
+disp('i) Capacitor = '+string (C1)+' muF')
+C2=(C3*C4)/(C3+C4); //CAPACITOR IN PARALLEL
+disp('i) Capacitor = '+string (C2)+' muF')
diff --git a/1760/CH1/EX1.3/EX1_3.sce b/1760/CH1/EX1.3/EX1_3.sce
new file mode 100755
index 000000000..be1fd8fc8
--- /dev/null
+++ b/1760/CH1/EX1.3/EX1_3.sce
@@ -0,0 +1,9 @@
+ //EXAMPLE 1-3 PG NO-18
+A20=0.00393; //ALPHA 20
+R30=1.3; //RESITANCE 30
+A30=A20/(1+A20*(30-20)); //ALPHA 30
+disp('i)Alpha30 (A30) = '+string (A30)+' ');
+T=[((1.6/1.3)-1)/0.00378]; // THE RISE IN TEMPERATURE TO BE FIND where T=t-30
+disp('ii)Resistance Temperature (t-30) = '+string (T)+' degree celcious');
+
+
diff --git a/1760/CH1/EX1.30/EX1_30.sce b/1760/CH1/EX1.30/EX1_30.sce
new file mode 100755
index 000000000..766918d85
--- /dev/null
+++ b/1760/CH1/EX1.30/EX1_30.sce
@@ -0,0 +1,13 @@
+ //EXAMPLE 1-30 PG NO-28
+Q=80*10^-4; //COULUMB CHARGR
+C=150*10^-6;
+C1=100*10^-6; //CAPACITANCE
+C2=50*10^-6;
+Va=Q/C1;
+Vb=Q/C2;
+E1=(0.5*C1*Va*Va)+(0.5*C2*Vb*Vb); //ENERGY
+E2=0.5*C*(Va+Vb)*(Va+Vb);
+disp('i)variable = '+string (Va)+' ohm')
+disp('i)variable = '+string (Vb)+' ohm')
+disp('i)energy = '+string (E1)+' J')
+disp('i)energy = '+string (E2)+' J')
diff --git a/1760/CH1/EX1.32/EX1_32.sce b/1760/CH1/EX1.32/EX1_32.sce
new file mode 100755
index 000000000..7fccf02ae
--- /dev/null
+++ b/1760/CH1/EX1.32/EX1_32.sce
@@ -0,0 +1,9 @@
+ //EXAMPLE 1-32 PG NO-29
+V=10; //VOLTAGE
+R1=2;
+R2=8; //RESISTANCE
+I1=V/(R1+R2); //CURRENT
+I2=1.25; //CURRENT THROUGH SECOND BRANCH
+R=V/I2-5;
+disp('i)CURRENT = '+string (I1)+' A')
+disp('ii)RESISTANCE = '+string (R)+' ohm')
diff --git a/1760/CH1/EX1.33/EX1_33.sce b/1760/CH1/EX1.33/EX1_33.sce
new file mode 100755
index 000000000..e0de79384
--- /dev/null
+++ b/1760/CH1/EX1.33/EX1_33.sce
@@ -0,0 +1,9 @@
+ //EXAMPLE 1-33 PG NO-29-30
+R1=29980; //RESISTANCE
+I1=9.99; //current
+R2=20;
+I2=0.01; //current
+r=20*0.01/9.99; //resistance
+disp('i)resistance = '+string (r)+' ohm')
+
+
diff --git a/1760/CH1/EX1.34/EX1_34.sce b/1760/CH1/EX1.34/EX1_34.sce
new file mode 100755
index 000000000..80334f0be
--- /dev/null
+++ b/1760/CH1/EX1.34/EX1_34.sce
@@ -0,0 +1,6 @@
+ //Example 1-34 PG NO-30
+V=20; //VOLTAGE
+R1=5; //Resistance
+X=7.5;
+P=(20/(R1+X))^2*(X); //Power
+disp('i) Power (P) is = '+string (P) +' W ');
diff --git a/1760/CH1/EX1.35/EX1_35.sce b/1760/CH1/EX1.35/EX1_35.sce
new file mode 100755
index 000000000..3f76e1c75
--- /dev/null
+++ b/1760/CH1/EX1.35/EX1_35.sce
@@ -0,0 +1,25 @@
+ //EXAMPLE 1-35 PG NO 30-31
+I1=4; //Current
+I2=6; //Current
+V=110; //Voltage
+Vab1=V-(6+4)*2;
+VB=80;
+VC=50;
+R11=(Vab1-VB)/I1;
+R12=(Vab1-VC)/I2;
+Vab2=V-(-2+20)*2; //Voltage
+R21=(VB-Vab2)/2; //Resistance
+R22=(Vab2-VC)/20; //Resistance
+I=(V-VB)/2; //Current
+R=(VB-VC)/I; //Resistance
+disp('i)variable = '+string (Vab1)+' ohm')
+disp('ii)resistance = '+string (R11)+' ohm')
+disp('iii)resistance = '+string (R12)+' ohm')
+disp('iv)variable = '+string (Vab2)+' ohm')
+disp('v)resistance = '+string (R21)+' ohm')
+disp('vi)resistance = '+string (R22)+' ohm')
+disp('vii) resistance = '+string (R) + ' ohm')
+disp('viii) Current = '+string (I) + ' A')
+
+
+
diff --git a/1760/CH1/EX1.36/EX1_36.sce b/1760/CH1/EX1.36/EX1_36.sce
new file mode 100755
index 000000000..37aeb0b7f
--- /dev/null
+++ b/1760/CH1/EX1.36/EX1_36.sce
@@ -0,0 +1,20 @@
+ //EXAMPLE 1-36 PG NO-31
+T=0.99425; //TIME
+disp('i)Time = '+string (T)+' seconds')
+X=0.37; //DERAVATIVES OF 'I' W.R.T
+disp('ii)(di\dt) = '+string (X)+' A\sec')
+LI=0.63; //CURRENT
+dli=0.37; // deravatives of 'SI' w.r.t
+disp('iii)(dsi\dt) = '+string (dli)+' Wb-turns\sec')
+VL=dli;
+disp('iv)(VL) = '+string (VL)+' V')
+Ri=0.63;
+VR=Ri;
+disp('v)VR = '+string (VR)+' V')
+E=0.5*LI*LI; //ENERGY
+disp('vi)ENERGY stored in magnetic field = '+string (E)+' J')
+E1=LI*v; //ENERGY STORED IN MAGNETIC FIELD
+H=Ri*Ri; //HEAT
+disp('vii) Rate of Energy stored in magnetic field = '+string (E1)+' W')
+disp('viii)Rate of dissipation of heat in resistor = '+string (H)+' W')
+disp('ix)Rate of supply of battery energy = '+string (Ri)+' W')
diff --git a/1760/CH1/EX1.37/EX1_37.sce b/1760/CH1/EX1.37/EX1_37.sce
new file mode 100755
index 000000000..b41e6d73e
--- /dev/null
+++ b/1760/CH1/EX1.37/EX1_37.sce
@@ -0,0 +1,11 @@
+T=2000; //TEMPERATURE
+T1=15; //ROOM TEMPERATURE
+V=220; //VOLTAGE
+P=40; //POWER
+A15=0.005;
+R=V*V/P; //RESISTANCE
+R15=R/(1+A15*(T-T1)); //RESISTANCE AT TIME OF SWITICHING
+I=V/R15; //CURRENT
+disp('i)resistance = '+string (R)+' ohm')
+disp('ii)resistance = '+string (R15)+' ohm')
+disp('iii)current = '+string (I)+' A')
diff --git a/1760/CH1/EX1.38/EX1_38.sce b/1760/CH1/EX1.38/EX1_38.sce
new file mode 100755
index 000000000..895ed2271
--- /dev/null
+++ b/1760/CH1/EX1.38/EX1_38.sce
@@ -0,0 +1,12 @@
+ //EXAMPLE 1-38 PG NO-32
+F=50; //Frequency
+W=2*%pi*F;
+disp('i)W = '+string (W)+' rad/sec');
+t=0.0025; //time
+Vm=10;
+A1=0.01;
+A2=0.005;
+i=[(A2*Vm^2)/2]+0.0707;
+disp('ii)Current = '+string (i)+' A')
+
+
diff --git a/1760/CH1/EX1.39/EX1_39.sce b/1760/CH1/EX1.39/EX1_39.sce
new file mode 100755
index 000000000..fcbc6f6f8
--- /dev/null
+++ b/1760/CH1/EX1.39/EX1_39.sce
@@ -0,0 +1,10 @@
+ //EXAMPLE 1-39 PG NO-32-33
+V=440; //voltage
+V1=5; //voltage
+R=40; //resistance
+V2=220;
+V3=100;
+Rv=(V3*R)/[V2-V3]; //insulation resistance
+disp('i)Resistance (Rv) = ' + string (Rv)+' Kohm')
+Ri=[Rv*(V-V1)]/V1; //insulation resistance
+disp('iii)Resistance(Ri) = '+string (Ri)+' Kohm')
diff --git a/1760/CH1/EX1.4/EX1_4.sce b/1760/CH1/EX1.4/EX1_4.sce
new file mode 100755
index 000000000..3c796bad8
--- /dev/null
+++ b/1760/CH1/EX1.4/EX1_4.sce
@@ -0,0 +1,26 @@
+ //EXAMPLE 1-4 PG NO 18-19
+R1=2.22; //RESISTANCE
+R2=0.6; //RESISTANCE
+R3=3; //Resistance
+R4=4;
+R5=5;
+R6=6;
+R7=2;
+R=R1+R2+R3;
+disp('i) Resistance (R) is = '+string ([R]) +' ohm ');
+V=12; //VOLTAGE
+I=V/R; //Current
+disp('ii) CURRENT (I) is = '+string ([I]) +' A ');
+I3=I; //CURRENT THROUGH 3 ohm RESISTANCE
+disp('iii) CURRENT (I3) is = '+string ([I3]) +' A ');
+I5=(I3*R4)/(R4+R5); //CURRENT THROUGH 5 ohm RESISTANCE
+disp('iv) CURRENT (I5) is = '+string ([I5]) +' A ');
+I4=(I3*R5)/(R4+R5); //CURRENT THROUGH 4 ohm RESISTANCE
+disp('v) CURRENT (I4) is = '+string ([I4]) +' A ');
+V1=1.236; //VOLTAGE ACROSS THREE PARALLEL RESISTANCE
+I2=V1/R7; //current
+disp('vi) CURRENT (I2) is = '+string ([I2]) +' A ');
+I1=V1; //CURRENT THROUGH 1 ohm RESISTANCE
+disp('iv) CURRENT (I1) is = '+string ([I1]) +' A ');
+I6=V1/R6; //CURRENT THROUGH 6 ohm RESISTANCE
+disp('vii) CURRENT (I6) is = '+string ([I6]) +' A ');
diff --git a/1760/CH1/EX1.40/EX1_40.sce b/1760/CH1/EX1.40/EX1_40.sce
new file mode 100755
index 000000000..04ee8a821
--- /dev/null
+++ b/1760/CH1/EX1.40/EX1_40.sce
@@ -0,0 +1,5 @@
+ //EXAMPLE 1-40 PG NO-33
+P=1.72*10^-8; //PRO
+t=0.03; //distance
+R=[(4*P)/(%pi*0.03)]*0.47; //Resistance
+disp('i) Resistance = '+string (R)+' ohm')
diff --git a/1760/CH1/EX1.41/EX1_41.sce b/1760/CH1/EX1.41/EX1_41.sce
new file mode 100755
index 000000000..c3c8f4738
--- /dev/null
+++ b/1760/CH1/EX1.41/EX1_41.sce
@@ -0,0 +1,5 @@
+ //EXAMPLE 1-41 PG NO-33
+P=1.72*10^-8; //PRO
+t=0.03;
+R=[(P*%pi)/(4*0.03*0.47)];
+disp('i) Resistance = '+string (R)+' ohm')
diff --git a/1760/CH1/EX1.42/EX1_42.sce b/1760/CH1/EX1.42/EX1_42.sce
new file mode 100755
index 000000000..1cd48cb67
--- /dev/null
+++ b/1760/CH1/EX1.42/EX1_42.sce
@@ -0,0 +1,7 @@
+ //EXAMPLE 1-42 PG NO-34
+P=100; //pro
+L=0.5; //inductance
+r1=0.15; //radius
+r2=0.075; //radius
+R=[100/(2*%pi*L)]*(0.731); //resistance
+disp('i) Resistance = '+string (R)+' ohm')
diff --git a/1760/CH1/EX1.44/EX1_44.sce b/1760/CH1/EX1.44/EX1_44.sce
new file mode 100755
index 000000000..855d72a87
--- /dev/null
+++ b/1760/CH1/EX1.44/EX1_44.sce
@@ -0,0 +1,6 @@
+ //EXAMPLE 1-44 PG NO-36
+R1=12; //Resistance
+R2=0.2; //Resistance
+R3=15;
+V1=[-(R2*R3)+R1]/3; //voltage drop
+disp('i) VOLTAGE = '+string (V1)+' V');
diff --git a/1760/CH1/EX1.46/EX1_46sce.sce b/1760/CH1/EX1.46/EX1_46sce.sce
new file mode 100755
index 000000000..1d4620335
--- /dev/null
+++ b/1760/CH1/EX1.46/EX1_46sce.sce
@@ -0,0 +1,9 @@
+ //EXAMPLE 1-46 PG NO37
+A=[85 -25;-25 135]; // Finding current
+B=[60;100];
+X=A\B; // current
+disp('i)CURRENT = '+string (X)+' A')
+I1=0.977;
+I2=0.922; //WE HAVE FOUNDED I1 and I2
+I3=I1-I2;
+disp('ii)CURRENT = '+string (I3)+' A')
diff --git a/1760/CH1/EX1.47/EX1_47.sce b/1760/CH1/EX1.47/EX1_47.sce
new file mode 100755
index 000000000..39ce1a89e
--- /dev/null
+++ b/1760/CH1/EX1.47/EX1_47.sce
@@ -0,0 +1,10 @@
+ //EXAMPLE 1-48 PG NO-39-40
+R1=4; //Resistance
+R2=4; //Resistance
+R3=8; //Resistance
+RA=(R1*R2)/(R1+R2+R3);
+disp('i)RESISTANCE = '+string (RA)+' ohm');
+RB=(R1*R3)/(R1+R2+R3);
+disp('ii)RESISTANCE = '+string (RB)+' ohm');
+RC=(R2*R3)/(R1+R2+R3);
+disp('iii)RESISTANCE = '+string (RC)+' ohm')
diff --git a/1760/CH1/EX1.48/EX1_48.sce b/1760/CH1/EX1.48/EX1_48.sce
new file mode 100755
index 000000000..37acdb962
--- /dev/null
+++ b/1760/CH1/EX1.48/EX1_48.sce
@@ -0,0 +1,10 @@
+ //EXAMPLE 1-48 PG NO-39-40
+R1=6.8; //Resistance
+R2=15;
+R3=10;
+RA=(R1*R2)/(R1+R2+R3);
+disp('i)RESISTANCE = '+string (RA)+' ohm');
+RB=(R1*R3)/(R1+R2+R3);
+disp('ii)RESISTANCE = '+string (RB)+' ohm');
+RC=(R2*R3)/(R1+R2+R3);
+disp('iii)RESISTANCE = '+string (RC)+' ohm')
diff --git a/1760/CH1/EX1.5/EX1_5.sce b/1760/CH1/EX1.5/EX1_5.sce
new file mode 100755
index 000000000..0687a896a
--- /dev/null
+++ b/1760/CH1/EX1.5/EX1_5.sce
@@ -0,0 +1,11 @@
+ //EXAMPLE 1-5 PG NO-19
+V1=230; //VOLTAGE ONE
+P1=1000; //POWER
+R=V1*V1/P1; //RESISTANCE OF HEATER
+V2=210; //VOLTAGE TWO
+P2=V2*V2/R; //POWER OF HEATER WHEN VOLTAGE IS 210
+R=(V1*V1)/P1 //Resistance
+disp('i)RESISTANCE = '+string (R)+' ohm');
+P2=(V2*V2)/R; //Power
+disp('ii)POWER = '+string (P2)+' ohm');
+
diff --git a/1760/CH1/EX1.50/EX1_50.sce b/1760/CH1/EX1.50/EX1_50.sce
new file mode 100755
index 000000000..c2df79263
--- /dev/null
+++ b/1760/CH1/EX1.50/EX1_50.sce
@@ -0,0 +1,6 @@
+ //EXAMPLE 1-50 PG NO-45
+TR=17/6; //TOTAL RESISTANCE
+V=40; //VOLTAGE
+I=5; //CURRENT
+Vs=(TR*I)-V;
+disp('i)VOLTAGE = '+string (Vs)+' V')
diff --git a/1760/CH1/EX1.51/EX1_51.sce b/1760/CH1/EX1.51/EX1_51.sce
new file mode 100755
index 000000000..479ed07ad
--- /dev/null
+++ b/1760/CH1/EX1.51/EX1_51.sce
@@ -0,0 +1,5 @@
+ //EXAMPLE 1-51 PG NO-45-46
+TR=2.05; //TOTAL RESISTANCE
+V=2; //VOLTAGE
+P=V^2/TR; //ower
+disp('i)POWER = '+string (P)+' W')
diff --git a/1760/CH1/EX1.52/EX1_52.sce b/1760/CH1/EX1.52/EX1_52.sce
new file mode 100755
index 000000000..e5251d944
--- /dev/null
+++ b/1760/CH1/EX1.52/EX1_52.sce
@@ -0,0 +1,11 @@
+ //EXAMPLE 1-52 PG NO-46
+L1=1;
+L2=1;
+L3=1; //INDUCTANCE
+DL1=[(L1*L2)+(L2*L3)+(L3*L1)]/(L1*L2*L3);
+disp('i)DELTA INDUCTANCE = '+string (DL1)+' H')
+L4=1.5;
+L5=1.5; //Inductance
+L6=1.5;
+L=[L4*(L5+L6)]/[L4+L5+L6];
+disp('ii)INDUCTANCE = '+string (L)+' H')
diff --git a/1760/CH1/EX1.53/EX1_53.sce b/1760/CH1/EX1.53/EX1_53.sce
new file mode 100755
index 000000000..9bfbd5a83
--- /dev/null
+++ b/1760/CH1/EX1.53/EX1_53.sce
@@ -0,0 +1,7 @@
+ //EXAMPLE 1-53 PG NO-46-47
+R1=200; //RESISTANCE
+R2=50;
+R3=30;
+R4=20;
+Rab=[R1*(R2+R3+R4)]/(R1+R2+R3+R4); //equvalent resistance
+disp('i)RESISTANCE = '+string (Rab)+' ohm')
diff --git a/1760/CH1/EX1.6/EX1_6.sce b/1760/CH1/EX1.6/EX1_6.sce
new file mode 100755
index 000000000..df83eb521
--- /dev/null
+++ b/1760/CH1/EX1.6/EX1_6.sce
@@ -0,0 +1,15 @@
+ //EXAMPLE 1-6 PG NO-19-20
+I=12; //CURRENT
+V=230; //VOLTAGE
+P=1000; //POWER
+T=3; //TIME
+S=3600;
+E=(I*V/P)*T; //ENERGY USED
+Q=I*T*S; //QUANTITY OF ELECTRICITY USED
+IC=6.24*10^18;
+N.C=IC*Q; //NUMBER OF ELECTRON
+R=I*V; //RATE OF ENERGY
+disp('i) ENERGY = '+string (E)+' KWh');
+disp('ii) QUANTITY = '+string (Q)+' C');
+disp('iiI) NUMBER OF ELECTRON = '+string (N.C)+' ');
+disp('iiII) RATE OF ENERGY = '+string (R)+' W');
diff --git a/1760/CH1/EX1.7/EX1_7.sce b/1760/CH1/EX1.7/EX1_7.sce
new file mode 100755
index 000000000..574ba2dd9
--- /dev/null
+++ b/1760/CH1/EX1.7/EX1_7.sce
@@ -0,0 +1,14 @@
+ //Example 1_7 PG NO-20
+I1=3; //current
+I2=1; //current
+R=4; //Resistor
+I=I1-I2; //current through resistance
+disp('i)Current Through resistance (I) = '+string (I)+' A');
+P=I*I*R;
+disp('ii)Power dissipated in resistor (P) = '+string (P)+' W');
+V=I*R;
+disp('iii)voltage (V) = '+string (V)+' V');
+P1=V*I1; //power dissipated with 3A source
+disp('iv)power dissipated with 3A source (P1) = '+string (P1)+' W');
+
+