21 files changed, 257 insertions, 0 deletions
diff --git a/2345/CH2/EX2.1/Ex2_1.sce b/2345/CH2/EX2.1/Ex2_1.sce
new file mode 100755
index 000000000..1274c2d91
--- /dev/null
+++ b/2345/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,15 @@
+//Finding resistance
+//Example 2.1(pg. 21)
+clc
+clear
+l=300//in meters
+a=25*(10^-6)//in meter square
+d15=2.7//density at 15 degree C in ohm-meter
+R15=d15*(l/a)
+printf('The value of Resistance at 15 degree C is %3.2f.ohms \n',R15)
+k0=0.004//temp coefficient in ohm/degree C at 0 degree C
+t=15,T=50//in degree C
+k15=k0/(1+(k0*t))
+R50=R15*(1+k15*(T-t))
+printf('The value of Resistance at 50 degree C is %3.2f.ohms',R50)
+
diff --git a/2345/CH2/EX2.10/Ex2_10.sce b/2345/CH2/EX2.10/Ex2_10.sce
new file mode 100755
index 000000000..041d0a76c
--- /dev/null
+++ b/2345/CH2/EX2.10/Ex2_10.sce
@@ -0,0 +1,12 @@
+//Finding resistance and temperature
+//Example 2.10(pg. 25)
+clc
+clear
+R15=50,RT=58// resistance in ohms
+t=15// te mp in degree C
+k0=0.00425// temp coefficient at 0 degree C
+R0=R15/[1+(k0*t)]// resistance at 0 degree C in ohms
+T=[(RT/R0)-1]/k0// temp in degree C
+
+printf('The value of Resistance at 0 degree C is %3.1f ohms \n',R0)
+printf('The value of Temperature at 58 ohm resistance is %3.4f degree C',T)
diff --git a/2345/CH2/EX2.11/Ex2_11.sce b/2345/CH2/EX2.11/Ex2_11.sce
new file mode 100755
index 000000000..c08774759
--- /dev/null
+++ b/2345/CH2/EX2.11/Ex2_11.sce
@@ -0,0 +1,9 @@
+//Finding temperature coefficient
+//Example 2.11(pg. 25)
+clc
+clear
+R25=50,R70=57.2// resistance in ohms
+t=25,T=70// temp in degree C
+//since Rt=R0(1+(k0*t))
+k0=(R70-R25)/[(R25*T)-(R70*t)]
+printf('The temp coefficient at 0 degree C is %3.3f',k0 )
diff --git a/2345/CH2/EX2.12/Ex2_12.sce b/2345/CH2/EX2.12/Ex2_12.sce
new file mode 100755
index 000000000..0c618021f
--- /dev/null
+++ b/2345/CH2/EX2.12/Ex2_12.sce
@@ -0,0 +1,11 @@
+//Finding resistance and conductivity
+//Example 2.12(pg. 26)
+clc
+clear
+R0=15.5// resistance in ohms
+t=16//in degree C
+k0=0.00428//temp coefficient
+R16=R0*[1+(k0*t)]
+G=(R0/R16)*100// since conductance=reciprocal of resistance
+printf('The value of Resistance at 16 degree C is %3.4f ohms \n',R16)
+printf('The value of percentage conductivity at 16 degree C is %3.2f percent',G)
diff --git a/2345/CH2/EX2.13/Ex2_13.sce b/2345/CH2/EX2.13/Ex2_13.sce
new file mode 100755
index 000000000..9f1832bb5
--- /dev/null
+++ b/2345/CH2/EX2.13/Ex2_13.sce
@@ -0,0 +1,9 @@
+//finding temperature
+//Example 2.13(pg. 26)
+clc
+clear
+RT=144,R20=10// in ohms
+t=20// in degree C
+k20=5*(10^-3)//temp coefficient at 20 degree C
+T={[(RT/R20)-1]/k20}+t
+printf('The value of temp required for tungsten bulb is %4.2f degree C',T)
diff --git a/2345/CH2/EX2.14/Ex2_14.sce b/2345/CH2/EX2.14/Ex2_14.sce
new file mode 100755
index 000000000..02826e042
--- /dev/null
+++ b/2345/CH2/EX2.14/Ex2_14.sce
@@ -0,0 +1,16 @@
+//Finding temperature
+//Example 2.14(pg. 27)
+clc
+clear
+V15=250,Vt=250//voltage in volts
+I15=5,It=4//current in amperes
+T=15//temp in degree C
+R15=V15/I15//resistance in ohms at 15 degreeC
+printf('Resistance at 15 degree C is %3.1f ohms \n',R15)
+Rt=Vt/It//resistance at t degreeC
+printf('Resistance at t degree C is %3.1f ohms \n',Rt)
+k0=0.0038
+R0=R15/[1+(k0*T)]
+printf('Resistance at 0 degree C is %3.2f ohms \n',R0)
+t=[(Rt/R0)-1]/k0
+printf('Temperature t is %3.2f degree C',t)
diff --git a/2345/CH2/EX2.15/Ex2_15.sce b/2345/CH2/EX2.15/Ex2_15.sce
new file mode 100755
index 000000000..e7778043c
--- /dev/null
+++ b/2345/CH2/EX2.15/Ex2_15.sce
@@ -0,0 +1,18 @@
+//Finding resistance
+//Example 2.15(pg. 28)
+clc
+clear
+n=100//no of slots
+c=12//conductors per slot
+Lm=300// mean length of turn in cm
+a=1.5*0.2//cross section of each conductor in cm^2
+s=1.72*(10^-6)//specific resistance of copper at 20 degreeC
+p=4// poles
+t=20,T=75//temp in degreeC
+k0=0.00427//temp coefficient of resistivity for copper
+L=n*c*Lm//total length of conductors
+Ls=L/p//length of conductors in each parallel path
+s0=s*(1-(k0*t))
+printf('Thus specific resistance at 0 degree C is %e ohm-cm \n',s0)
+RT=(s0*Ls)/a
+printf('Thus resistance at working temp of 75 degree C is %3.4f ohm',RT)
diff --git a/2345/CH2/EX2.16/Ex2_16.sce b/2345/CH2/EX2.16/Ex2_16.sce
new file mode 100755
index 000000000..b0a5b5484
--- /dev/null
+++ b/2345/CH2/EX2.16/Ex2_16.sce
@@ -0,0 +1,12 @@
+//Finding resistance
+//Example 2.16(pg. 28)
+clc
+clear
+a=15//cross section area in cm^2
+l=100000//length in cm
+p0=7.6*(10^-6)//specific resistance at 0 degree C in ohm-cm
+k0=0.005//temp coefficient at 0 degree C
+t=50//temp in degree C
+p50=p0*[1+(t*k0)]//resistivity at 50 degree C
+R50=p50*(l/a)
+printf('Thus resistance at 50 degree C is %3.5f ohms \n',R50)
diff --git a/2345/CH2/EX2.17/Ex2_17.sce b/2345/CH2/EX2.17/Ex2_17.sce
new file mode 100755
index 000000000..d1b59c95c
--- /dev/null
+++ b/2345/CH2/EX2.17/Ex2_17.sce
@@ -0,0 +1,8 @@
+//Finding fusing current
+//Example 2.17(pg. 29)
+clc
+clear
+I2=27.5//current of No.25 wire in Amperes
+d=1/2//since I1/I2=1/2
+I1=I2*(d^(3/2))
+printf('Thus fusing current of No.33 wire is %3.3f amperes \n',I1)
diff --git a/2345/CH2/EX2.18/Ex2_18.sce b/2345/CH2/EX2.18/Ex2_18.sce
new file mode 100755
index 000000000..7e95c93ba
--- /dev/null
+++ b/2345/CH2/EX2.18/Ex2_18.sce
@@ -0,0 +1,15 @@
+//Finding ratios
+//Example 2.18(pg. 30)
+clc
+clear
+sAl=2.85*(10^-6),sCu=1.7*(10^-6)//specific resistance in ohm-cm
+gAl=2.71,gCu=8.89//specific gravity 
+cAl=5000,cCu=10000//cost per tonne
+//P=V^2/R, power is same for both so resistance must also be same
+//so R=(p*l)/(pi*d^2)=(p*l)/(pi*d'^2)
+Kd=sqrt(sAl/sCu)//Kd=d/d'
+printf('Thus the ratio of diameters is %3.3f \n',Kd)
+Km=(Kd^2)*(gAl/gCu)
+printf('Thus the ratio of weights is %3.4f \n',Km)
+Kc=Km*(cAl/cCu)
+printf('Thus the ratio of costs is %3.4f',Kc)
diff --git a/2345/CH2/EX2.19/Ex2_19.sce b/2345/CH2/EX2.19/Ex2_19.sce
new file mode 100755
index 000000000..aa0e60d7d
--- /dev/null
+++ b/2345/CH2/EX2.19/Ex2_19.sce
@@ -0,0 +1,10 @@
+//Finding resistance
+//Example 2.19(pg. 33)
+clc
+clear
+R1=18.6//resistacne in ohms
+Kl=5//since l2=5*l1
+Ka=3// since a2=3*a1
+R2=R1*Kl/Ka
+// resistivity is same because wires are of same material
+printf('Thus the resistance of another conductor is %3.1f ohms',R2)
diff --git a/2345/CH2/EX2.2/Ex2_2.sce b/2345/CH2/EX2.2/Ex2_2.sce
new file mode 100755
index 000000000..9fc2b6a95
--- /dev/null
+++ b/2345/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,10 @@
+//Finding resistance
+//Example 2.2(pg. 21)
+clc
+clear
+R20=400// in ohms
+k0=0.0038
+t=20,T=80//degree C
+k1=k0/(1+(k0*t))
+R80=R20*{1+k1*(T-t)}
+printf('The value of Resistance at 80 degree C is %3.4f ohms',R80)
diff --git a/2345/CH2/EX2.20/Ex2_20.sce b/2345/CH2/EX2.20/Ex2_20.sce
new file mode 100755
index 000000000..3e741fb5e
--- /dev/null
+++ b/2345/CH2/EX2.20/Ex2_20.sce
@@ -0,0 +1,15 @@
+//Finding heat efficiency
+//Example 2.20(pg. 57)
+clc
+clear
+m=1//mass in kg
+S=4200//specific heat of water
+T2=100,T1=15// temp in degree C
+H=m*S*(T2-T1)//heat utilised in J
+printf('Heat utilised is %6.2f Joules \n',H)
+W=500//wattage rating of kettle in volts
+t=15*60// time in sec
+Hd=W*t//heat developed in J
+printf('Heat developed is %6.2f Joules \n',Hd)
+He=(H/Hd)*100//Heat efficiency
+printf('Thus heat efficiency is %3.2f percent',He)
diff --git a/2345/CH2/EX2.21/Ex2_21.sce b/2345/CH2/EX2.21/Ex2_21.sce
new file mode 100755
index 000000000..9a6263ced
--- /dev/null
+++ b/2345/CH2/EX2.21/Ex2_21.sce
@@ -0,0 +1,15 @@
+//Finding time
+//Example 2.21(pg. 58)
+clc
+clear
+m=3.6//mass in kg
+S=4200//specific heat of water
+T2=95,T1=15// temp in degree C
+H=m*S*(T2-T1)//heat utilised in J
+printf('Heat utilised is %7.2f Joules \n',H)
+e=0.84//efficiency of kettle
+Ei=H/e//Energy input in J
+printf('Energy input is %8.2f Joules \n',Ei)
+W=1000//rating of kettle in watts
+t=(Ei/W)/60//time taken in min
+printf('Thus time taken is %2.1f min \n',t)
diff --git a/2345/CH2/EX2.3/Ex2_3.sce b/2345/CH2/EX2.3/Ex2_3.sce
new file mode 100755
index 000000000..8a2719976
--- /dev/null
+++ b/2345/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,10 @@
+//Finding temperature
+//Example 2.3(pg. 22)
+clc
+clear
+t=15//degree C
+R15=250,RT=300//ohms
+k0=0.0038//ohm/degree C
+k1=k0/(1+(k0*t))
+T=[{(RT/R15)-1}/k1]+t//since RT=R15{1+k1*(T-t)}
+printf('The value of Temperature at 300 ohm resistance is %3.1f degree C',T)
diff --git a/2345/CH2/EX2.4/Ex2_4.sce b/2345/CH2/EX2.4/Ex2_4.sce
new file mode 100755
index 000000000..c09a15210
--- /dev/null
+++ b/2345/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,20 @@
+//Finding length
+//Example 2.4(pg. 22)
+clc
+clear
+//Part (a)
+d=0.4*(10^-3)//diameter in meter
+a=%pi*(d^2)/4//area in meter square
+p1=100*(10^-8)//resistivity of nichrome in ohm-meter
+R=40//resistance in ohms
+l1=R*a/p1
+printf('Thus the length of heater element with nichrome wire is %2.1f meter \n',l1)
+
+//Part(b)
+d=0.4*(10^-3)//diameter in meter
+a=12.6*(10^-8)//area in meter square
+p2=1.72*(10^-8)//resistance of copper wire in ohm-meter
+R=40//resistance in ohms
+l2=R*a/p2
+printf('Thus the length of heater element with copper wire is %2.1f meter',l2)
+
diff --git a/2345/CH2/EX2.5/Ex2_5.sce b/2345/CH2/EX2.5/Ex2_5.sce
new file mode 100755
index 000000000..e780e415d
--- /dev/null
+++ b/2345/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,9 @@
+//Finding resistance
+//Example 2.5(pg. 23)
+clc
+clear
+R0=80//in ohms
+t=40// in degree C
+k0=0.0043
+R40=R0*(1+(k0*t))
+printf('The value of Resistance at 40 degree C is %3.2f ohms',R40)
diff --git a/2345/CH2/EX2.6/Ex2_6.sce b/2345/CH2/EX2.6/Ex2_6.sce
new file mode 100755
index 000000000..72063bf9c
--- /dev/null
+++ b/2345/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,10 @@
+//Finding temperature coefficient
+//Example 2.6(pg. 23)
+clc
+clear
+R80=50,R28=40// resistance in ohms
+t=28,T=80// temp in degrees
+k28=[(R80/R28)-1]/(T-t)//since RT=Rt{1+k*(T-t)}
+printf('The value of Temperature coefficient  at 28 degree C is %3.4f ohms per degree C \n',k28)
+k0=k28/(1-k28*t)// since k28=k0/(1+k0*t)
+printf('The value of Temperature coefficient  at 0 degree C is %3.4f ohms per degree C',k0)
diff --git a/2345/CH2/EX2.7/Ex2_7.sce b/2345/CH2/EX2.7/Ex2_7.sce
new file mode 100755
index 000000000..e71b45ed5
--- /dev/null
+++ b/2345/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,10 @@
+//Finding resistance
+//Example 2.7(pg. 24)
+clc
+clear
+l=1000// length in meters
+d=0.09/100// diameter in meters
+p=1.724*(10^-8)// specific resistance in ohm meter
+a=%pi*(d^2)/4// area in meter square
+R=p*l/a//resistance in ohms
+printf('The value of Resistance is %3.2f ohms',R)
diff --git a/2345/CH2/EX2.8/Ex2_8.sce b/2345/CH2/EX2.8/Ex2_8.sce
new file mode 100755
index 000000000..506db5849
--- /dev/null
+++ b/2345/CH2/EX2.8/Ex2_8.sce
@@ -0,0 +1,11 @@
+//Finding resistance
+//Example 2.8(pg. 24)
+clc
+clear
+R20=50// resistance in ohms
+T=60,t=20// temp in degree C
+k0=0.00427//temp coefficient at zero degreeC
+R0=R20/{1+(k0*t)}
+printf('The value of Resistance at 0 degree C is %3.2f ohms \n',R0)
+R60=R0*{1+(k0*T)}
+printf('The value of Resistance at 60 degree C is %3.2f ohms',R60)
diff --git a/2345/CH2/EX2.9/Ex2_9.sce b/2345/CH2/EX2.9/Ex2_9.sce
new file mode 100755
index 000000000..b1b9ea4a1
--- /dev/null
+++ b/2345/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,12 @@
+//Finding resistivity and temp coefficient
+//Example 2.9(pg. 24)
+clc
+clear
+k20=1/254.5// temperature coefficient at 20 degreeC
+p0=1.6*(10^-6)// resistivity at 0 degree C in ohm-cm
+t=20,T=50//temp in degree C
+k0=k20/(1-(t*k20))//temperature coefficient at 0 degreeC
+p50=p0*[1+(T*k0)]// resistivity at 50 degree C in ohm-cm
+k50=1/[T+(1/k0)]//temperature coefficient at 50 degreeC
+printf('Thus the temperature coefficient at 50 degree C is %3.4f \n',k0)
+printf('Thus the resistivity at 50 degree C is %e in ohm-cm',p50)