summaryrefslogtreecommitdiff
path: root/147/CH1
diff options
context:
space:
mode:
Diffstat (limited to '147/CH1')
-rw-r--r--147/CH1/EX1.1/Example1_1.sce19
-rw-r--r--147/CH1/EX1.1/Result1_1.txt3
-rw-r--r--147/CH1/EX1.10/Example1_10.sce9
-rw-r--r--147/CH1/EX1.10/Result1_10.txt1
-rw-r--r--147/CH1/EX1.14/Example1_14.sce16
-rw-r--r--147/CH1/EX1.14/Result1_14.txt1
-rw-r--r--147/CH1/EX1.15/Example1_15.sce9
-rw-r--r--147/CH1/EX1.15/Result1_15.txt1
-rw-r--r--147/CH1/EX1.17/Example1_17.sce12
-rw-r--r--147/CH1/EX1.17/Result1_17.txt1
-rw-r--r--147/CH1/EX1.2/Example1_2.sce16
-rw-r--r--147/CH1/EX1.2/Result1_2.txt4
-rw-r--r--147/CH1/EX1.22/Example1_22.sce12
-rw-r--r--147/CH1/EX1.22/Result1_22.txt2
-rw-r--r--147/CH1/EX1.24/Example1_24.sce14
-rw-r--r--147/CH1/EX1.24/Result1_24.txt2
-rw-r--r--147/CH1/EX1.27/Example1_27.sce16
-rw-r--r--147/CH1/EX1.27/Result1_27.txt2
-rw-r--r--147/CH1/EX1.3/Example1_3.sce28
-rw-r--r--147/CH1/EX1.3/Result1_3.txt6
-rw-r--r--147/CH1/EX1.4/Example1_4.sce18
-rw-r--r--147/CH1/EX1.4/Result1_4.txt1
-rw-r--r--147/CH1/EX1.5/Example1_5.sce15
-rw-r--r--147/CH1/EX1.5/Result1_5.txt4
-rw-r--r--147/CH1/EX1.6/Example1_6.sce23
-rw-r--r--147/CH1/EX1.6/Result1_6.txt1
-rw-r--r--147/CH1/EX1.7/Example1_7.sce18
-rw-r--r--147/CH1/EX1.7/Result1_7.txt4
-rw-r--r--147/CH1/EX1.9/Example1_9.sce15
-rw-r--r--147/CH1/EX1.9/Result1_9.txt1
30 files changed, 274 insertions, 0 deletions
diff --git a/147/CH1/EX1.1/Example1_1.sce b/147/CH1/EX1.1/Example1_1.sce
new file mode 100644
index 000000000..fe77d781c
--- /dev/null
+++ b/147/CH1/EX1.1/Example1_1.sce
@@ -0,0 +1,19 @@
+close();
+clear;
+clc;
+//resistance 'R1' at 'T1' degree C,resistance 'R2' at 'T2' temperature
+T1 = 20; //degree C
+T2 = 80; //degree C
+R1 = 4; //ohm
+R2 = 4.52; //ohm
+A = [1 T1;1 T2];
+C = [R1;R2];
+B = inv(A)*C;
+//temperature coefficient of resistance of material 'a'
+aRo = B(2,1); //a*Ro
+Ro = B(1,1);
+a = aRo / Ro;
+mprintf("(a) Temperature coefficient of resistance of the material, a = %0.2e per degree C\n\n",a);
+//Resistance of coil at 100 degree C
+R100 = Ro*(1 + 100*a); //ohm
+mprintf("(b) Resistance of coil at 100 degree C, R100 = %0.2f ohm",R100); \ No newline at end of file
diff --git a/147/CH1/EX1.1/Result1_1.txt b/147/CH1/EX1.1/Result1_1.txt
new file mode 100644
index 000000000..bcc0068f1
--- /dev/null
+++ b/147/CH1/EX1.1/Result1_1.txt
@@ -0,0 +1,3 @@
+(a) Temperature coefficient of resistance of the material, a = 2.26e-003 per degree C
+
+(b) Resistance of coil at 100 degree C, R100 = 4.69 ohm \ No newline at end of file
diff --git a/147/CH1/EX1.10/Example1_10.sce b/147/CH1/EX1.10/Example1_10.sce
new file mode 100644
index 000000000..6e3f215fd
--- /dev/null
+++ b/147/CH1/EX1.10/Example1_10.sce
@@ -0,0 +1,9 @@
+//Inductance L, Current i, Time after which current reverses its direction T
+close();
+clear;
+clc;
+L = 0.05;//H
+i = 5;//A
+T = 25;//ms
+vavg = L*(i-(-i))/(T*10^(-3));
+mprintf('Average voltage induced in the inductance, vavg = %0.0f V',vavg); \ No newline at end of file
diff --git a/147/CH1/EX1.10/Result1_10.txt b/147/CH1/EX1.10/Result1_10.txt
new file mode 100644
index 000000000..6d4343c9e
--- /dev/null
+++ b/147/CH1/EX1.10/Result1_10.txt
@@ -0,0 +1 @@
+Average voltage induced in the inductance, vavg = 20 V \ No newline at end of file
diff --git a/147/CH1/EX1.14/Example1_14.sce b/147/CH1/EX1.14/Example1_14.sce
new file mode 100644
index 000000000..720aba908
--- /dev/null
+++ b/147/CH1/EX1.14/Example1_14.sce
@@ -0,0 +1,16 @@
+//Capacitance C, Energy stored in capacitor1 Ui
+close();
+clear;
+clc;
+C1 = 40 * 10^(-6);//F
+Ui = 0.2;//J
+C2 = 60*10^(-6);//F
+//Initial charge on C1
+Q1 = (2*Ui*C1)^(1/2);
+//Final Voltage
+V = Q1/(C1+C2);
+Uf1 = 1/2*C1*V^2;
+Uf2 = 1/2*C2*V^2;
+//Final Energy
+Uf = Uf1+Uf2;
+mprintf('Final energy of the system, U = %0.2f J',Uf); \ No newline at end of file
diff --git a/147/CH1/EX1.14/Result1_14.txt b/147/CH1/EX1.14/Result1_14.txt
new file mode 100644
index 000000000..66dc5ac57
--- /dev/null
+++ b/147/CH1/EX1.14/Result1_14.txt
@@ -0,0 +1 @@
+Final energy of the system, U = 0.08 J \ No newline at end of file
diff --git a/147/CH1/EX1.15/Example1_15.sce b/147/CH1/EX1.15/Example1_15.sce
new file mode 100644
index 000000000..3c752ea45
--- /dev/null
+++ b/147/CH1/EX1.15/Example1_15.sce
@@ -0,0 +1,9 @@
+close();
+clear;
+clc;
+exec 'symbolic.sce'
+syms R1 R2 R3 I
+V1 = I*R1;
+V2 = I*R2;
+V3 = I*R3;
+V = V1 + V2 + V3; \ No newline at end of file
diff --git a/147/CH1/EX1.15/Result1_15.txt b/147/CH1/EX1.15/Result1_15.txt
new file mode 100644
index 000000000..2a3389c7f
--- /dev/null
+++ b/147/CH1/EX1.15/Result1_15.txt
@@ -0,0 +1 @@
+V = V1+V2+V3 \ No newline at end of file
diff --git a/147/CH1/EX1.17/Example1_17.sce b/147/CH1/EX1.17/Example1_17.sce
new file mode 100644
index 000000000..67db58c14
--- /dev/null
+++ b/147/CH1/EX1.17/Example1_17.sce
@@ -0,0 +1,12 @@
+close();
+clear;
+clc;
+I1 = -1; //A
+I2 = 3; //A
+I3 = 5; //A
+I4 = -4; //A
+I5 = -2; //A
+I6 = -6; //A
+//current assumed out of the node
+I = (I1+I2+I3+I4+I5+I6);
+mprintf("I = %d A",I); \ No newline at end of file
diff --git a/147/CH1/EX1.17/Result1_17.txt b/147/CH1/EX1.17/Result1_17.txt
new file mode 100644
index 000000000..6ccb7c1f7
--- /dev/null
+++ b/147/CH1/EX1.17/Result1_17.txt
@@ -0,0 +1 @@
+I = -5 A \ No newline at end of file
diff --git a/147/CH1/EX1.2/Example1_2.sce b/147/CH1/EX1.2/Example1_2.sce
new file mode 100644
index 000000000..304cb5de0
--- /dev/null
+++ b/147/CH1/EX1.2/Example1_2.sce
@@ -0,0 +1,16 @@
+//Resistance R1,R2 and R3 connected in series, Voltage V
+close();
+clear;
+clc;
+R1 = 5;//ohm
+R2 = 7;
+R3 = 8;
+V = 100;
+//Total Resistance 'Res'
+Res = R1+R2+R3;
+I = V/Res;
+//Voltage across R1 'V1'
+V1 = R1*I;
+V2 = R2*I;
+V3 = R3*I;
+mprintf('Current, I = %0.0f A \nVoltage across the 5 ohm = %0.0f V\nVoltage across the 7 ohm = %0.0f V\nVoltage across the 8 ohm = %0.0f V',I,V1,V2,V3); \ No newline at end of file
diff --git a/147/CH1/EX1.2/Result1_2.txt b/147/CH1/EX1.2/Result1_2.txt
new file mode 100644
index 000000000..ee6196b66
--- /dev/null
+++ b/147/CH1/EX1.2/Result1_2.txt
@@ -0,0 +1,4 @@
+Current, I = 5 A
+Voltage across the 5 ohm = 25 V
+Voltage across the 7 ohm = 35 V
+Voltage across the 8 ohm = 40 V \ No newline at end of file
diff --git a/147/CH1/EX1.22/Example1_22.sce b/147/CH1/EX1.22/Example1_22.sce
new file mode 100644
index 000000000..47adb0e1f
--- /dev/null
+++ b/147/CH1/EX1.22/Example1_22.sce
@@ -0,0 +1,12 @@
+//Resistance R, Current I
+close();
+clear;
+clc;
+R1 = 15;//ohm
+R2 = 25;//ohm
+I = 5;//A
+I1 = R2/(R1+R2)*I;
+I2 = R1/(R1+R2)*I;
+P1 = I1^2*R1;
+P2 = I2^2*R2;
+mprintf('Power consumed by Resistance R1, P1 = %0.1f W \nPower consumed by Resistance R2, P2 = %0.1f W',P1,P2); \ No newline at end of file
diff --git a/147/CH1/EX1.22/Result1_22.txt b/147/CH1/EX1.22/Result1_22.txt
new file mode 100644
index 000000000..51d4f4d85
--- /dev/null
+++ b/147/CH1/EX1.22/Result1_22.txt
@@ -0,0 +1,2 @@
+Power consumed by Resistance R1, P1 = 146.5 W
+Power consumed by Resistance R2, P2 = 87.9 W \ No newline at end of file
diff --git a/147/CH1/EX1.24/Example1_24.sce b/147/CH1/EX1.24/Example1_24.sce
new file mode 100644
index 000000000..07cdc106e
--- /dev/null
+++ b/147/CH1/EX1.24/Example1_24.sce
@@ -0,0 +1,14 @@
+//Voltage of battery E, Current through bd i5
+close();
+clear;
+clc;
+R1 = 10;//ohm
+R2 = 20;
+R3 = 30;
+E = 45;
+i5 = 0;
+R4 = R2*R3/R1;
+//Effective Resistance 'Re'
+Re = (R1+R2)*(R3+R4)/(R1+R2+R3+R4);
+Ibattery = E/Re;
+mprintf('(a): R4 = %0.0f ohm\n(b): Current supplied by battery, I = %0.1f A',R4,Ibattery); \ No newline at end of file
diff --git a/147/CH1/EX1.24/Result1_24.txt b/147/CH1/EX1.24/Result1_24.txt
new file mode 100644
index 000000000..051a0dea1
--- /dev/null
+++ b/147/CH1/EX1.24/Result1_24.txt
@@ -0,0 +1,2 @@
+(a): R4 = 60 ohm
+(b): Current supplied by battery, I = 2.0 A \ No newline at end of file
diff --git a/147/CH1/EX1.27/Example1_27.sce b/147/CH1/EX1.27/Example1_27.sce
new file mode 100644
index 000000000..1619bf590
--- /dev/null
+++ b/147/CH1/EX1.27/Example1_27.sce
@@ -0,0 +1,16 @@
+close();
+clear;
+clc;
+R = 2; //ohm
+//Applying KVL in two loops
+//25 - 15*I1 - 10 + 3*I2 - 3*I1 = 0
+//20 - 3*I2 + 3*I1 - 2*I2 = 0
+//Solving the two equations
+A =[18 -3;-3 5];
+C = [15;20];
+B = inv(A)*C;
+I1 = B(1,1);
+I2 = B(2,1);
+//voltage across R
+Vab = R*I2; //V
+mprintf("Current through 2 ohm resistor, I2 = %d A\nVoltage across 2 ohm resistor, Vab = %d V",I2,Vab); \ No newline at end of file
diff --git a/147/CH1/EX1.27/Result1_27.txt b/147/CH1/EX1.27/Result1_27.txt
new file mode 100644
index 000000000..1087a1db7
--- /dev/null
+++ b/147/CH1/EX1.27/Result1_27.txt
@@ -0,0 +1,2 @@
+Current through 2 ohm resistor, I2 = 5 A
+Voltage across 2 ohm resistor, Vab = 10 V \ No newline at end of file
diff --git a/147/CH1/EX1.3/Example1_3.sce b/147/CH1/EX1.3/Example1_3.sce
new file mode 100644
index 000000000..0502dc7ac
--- /dev/null
+++ b/147/CH1/EX1.3/Example1_3.sce
@@ -0,0 +1,28 @@
+close();
+clear;
+clc;
+//Three resistances in parallel 'R1', 'R2', 'R3', Voltage source 'V'
+R1 = 5; //ohm
+R2 = 10; //ohm
+R3 = 20; //ohm
+V = 100; //V
+
+//(a)
+//current through R1 'I1'
+I1 = V/R1; //A
+//current through R2 'I2'
+I2 = V/R2; //A
+//current through R3 'I3'
+I3 = V/R3; //A
+
+mprintf("Current through %d ohm resistor, I1 = %d A\n\n",R1,I1);
+mprintf("Current through %d ohm resistor, I2 = %d A\n\n",R2,I2);
+mprintf("Current through %d ohm resistor, I3 = %d A\n\n",R3,I3);
+
+//(b)
+//Total current drawn from source 'I'
+I = I1 + I2 + I3; //A
+//Power supplied by source 'P'
+P = V*I; //W
+
+mprintf("Current drawn from the source, I = %d A\nPower supplied by source, P = %d W",I,P); \ No newline at end of file
diff --git a/147/CH1/EX1.3/Result1_3.txt b/147/CH1/EX1.3/Result1_3.txt
new file mode 100644
index 000000000..a2ed74229
--- /dev/null
+++ b/147/CH1/EX1.3/Result1_3.txt
@@ -0,0 +1,6 @@
+(a) Current through 5 ohm resistor, I1 = 20 A
+ Current through 10 ohm resistor, I2 = 10 A
+ Current through 20 ohm resistor, I3 = 5 A
+
+(b) Current drawn from the source, I = 35 A
+ Power supplied by source, P = 3500 W \ No newline at end of file
diff --git a/147/CH1/EX1.4/Example1_4.sce b/147/CH1/EX1.4/Example1_4.sce
new file mode 100644
index 000000000..87ab958f3
--- /dev/null
+++ b/147/CH1/EX1.4/Example1_4.sce
@@ -0,0 +1,18 @@
+//Resistance R
+close();
+clear;
+clc;
+R1 = 1;//ohm
+R2 = 2;
+R3 = 3;
+R4 = 6;
+R5 = 6;
+R6 = 16;
+R7 = 8;
+//Resistance between cd 'Rcd'
+Rcd = (R2*R3*R4)/(R2*R3+R3*R4+R4*R2);
+Raes = R1+Rcd+R5;
+Rae = Raes*R7/(Raes+R7);
+//Resistance between ab 'Rab'
+Rab = Rae+R6;
+mprintf('Rab = %0.0f ohm',Rab); \ No newline at end of file
diff --git a/147/CH1/EX1.4/Result1_4.txt b/147/CH1/EX1.4/Result1_4.txt
new file mode 100644
index 000000000..eac5b9771
--- /dev/null
+++ b/147/CH1/EX1.4/Result1_4.txt
@@ -0,0 +1 @@
+Rab = 20 ohm \ No newline at end of file
diff --git a/147/CH1/EX1.5/Example1_5.sce b/147/CH1/EX1.5/Example1_5.sce
new file mode 100644
index 000000000..3a3df5212
--- /dev/null
+++ b/147/CH1/EX1.5/Example1_5.sce
@@ -0,0 +1,15 @@
+close();
+clear;
+clc;
+//resistance 'R1' rated at 'P1' and so on
+V = 110; //V
+P1 = 25; //W
+P2 = 60; //W
+P3 = 75; //W
+P4 = 100; //W
+R1 = V^2/P1; //ohm
+R2 = V^2/P2; //ohm
+R3 = V^2/P3; //ohm
+R4 = V^2/P4; //ohm
+
+mprintf("\nResistance %d ohm is rated at %d W\nResistance %0.2f ohm is rated at %d W\nResistance %0.1f ohm is rated at %d W\nResistance %d ohm is rated at %d W",round(R1),P1,R2,P2,R3,P3,round(R4),P4); \ No newline at end of file
diff --git a/147/CH1/EX1.5/Result1_5.txt b/147/CH1/EX1.5/Result1_5.txt
new file mode 100644
index 000000000..19c0e6a05
--- /dev/null
+++ b/147/CH1/EX1.5/Result1_5.txt
@@ -0,0 +1,4 @@
+Resistance 484 ohm is rated at 25 W
+Resistance 201.67 ohm is rated at 60 W
+Resistance 161.3 ohm is rated at 75 W
+Resistance 121 ohm is rated at 100 W \ No newline at end of file
diff --git a/147/CH1/EX1.6/Example1_6.sce b/147/CH1/EX1.6/Example1_6.sce
new file mode 100644
index 000000000..97dcfd1dc
--- /dev/null
+++ b/147/CH1/EX1.6/Example1_6.sce
@@ -0,0 +1,23 @@
+//Rating of electric heating pad Vr,Pr
+//Rating of bulbs Vbr,Pr
+close();
+clear;
+clc;
+Vr = 110;//V
+Pr = 55;//W
+V = 220;
+Vbr = 110;
+Pr1 = 25;
+Pr2 = 60;
+Pr3 = 75;
+Pr4 = 100;
+//Resistance of heating pad 'Rp'
+Rp = Vr^2/Pr;
+R1 = Vbr^2/Pr1;
+R2 = Vbr^2/Pr2;
+R3 = Vbr^2/Pr3;
+R4 = Vbr^2/Pr4;
+Rb = R4 + 1/2*R2;
+Ip = V/(Rp+Rb);
+H = Ip^2*Rp;
+mprintf('The possible combination is 100W bulb in series with parallel combination of two 60 W bulbs \nRate of heat produced by pad, H = %0.2f W',H); \ No newline at end of file
diff --git a/147/CH1/EX1.6/Result1_6.txt b/147/CH1/EX1.6/Result1_6.txt
new file mode 100644
index 000000000..f9e19c34f
--- /dev/null
+++ b/147/CH1/EX1.6/Result1_6.txt
@@ -0,0 +1 @@
+Rate of heat produced by pad, H = 54.54 W \ No newline at end of file
diff --git a/147/CH1/EX1.7/Example1_7.sce b/147/CH1/EX1.7/Example1_7.sce
new file mode 100644
index 000000000..dc8176855
--- /dev/null
+++ b/147/CH1/EX1.7/Example1_7.sce
@@ -0,0 +1,18 @@
+close();
+clear;
+clc;
+//resistance 'R1', 'R2', 'R3', 'R4' connected in series
+V = 100; //V
+R1 = 5; //ohm
+R2 = 10; //ohm
+R3 = 15; //ohm
+R4 = 20; //ohm
+//Voltage across R1 'V1'
+V1 = R1*V/(R1+R2+R3+R4);
+//Voltage across R2 'V2'
+V2 = R2*V/(R1+R2+R3+R4);
+//Voltage across R3 'V3'
+V3 = R3*V/(R1+R2+R3+R4);
+//Voltage across R4 'V4'
+V4 = R4*V/(R1+R2+R3+R4);
+mprintf("\nVoltage across %d ohm resistor is %d V\nVoltage across %d ohm resistor is %d V\nVoltage across %d ohm resistor is %d V\nVoltage across %d ohm resistor is %d V",R1,V1,R2,V2,R3,V3,R4,V4); \ No newline at end of file
diff --git a/147/CH1/EX1.7/Result1_7.txt b/147/CH1/EX1.7/Result1_7.txt
new file mode 100644
index 000000000..e28a1ee3f
--- /dev/null
+++ b/147/CH1/EX1.7/Result1_7.txt
@@ -0,0 +1,4 @@
+Voltage across 5 ohm resistor is 10 V
+Voltage across 10 ohm resistor is 20 V
+Voltage across 15 ohm resistor is 30 V
+Voltage across 20 ohm resistor is 40 V \ No newline at end of file
diff --git a/147/CH1/EX1.9/Example1_9.sce b/147/CH1/EX1.9/Example1_9.sce
new file mode 100644
index 000000000..06574a6d4
--- /dev/null
+++ b/147/CH1/EX1.9/Example1_9.sce
@@ -0,0 +1,15 @@
+close();
+clear;
+clc;
+//temperature coefficients of resistances 'R1', 'R2' are 'a1', 'a2'
+a1 = 0.004;
+a2 = 0.005;
+t1 = 10; //degree C
+t2 = 60; //degree C
+//At t1
+//R12 = Ro1/Ro2
+R12 = (1+t1*a2)/(1+t1*a1);
+//At t2
+//power ratio 'p'
+p = R12*(1+t2*a1)/(1+t2*a2);
+mprintf("Ratio of power consumed in R2 to that in R1 at %d degree C, p = %0.3f",t2,p); \ No newline at end of file
diff --git a/147/CH1/EX1.9/Result1_9.txt b/147/CH1/EX1.9/Result1_9.txt
new file mode 100644
index 000000000..b99e71341
--- /dev/null
+++ b/147/CH1/EX1.9/Result1_9.txt
@@ -0,0 +1 @@
+Ratio of power consumed in R2 to that in R1 at 60 degree C, p = 0.963 \ No newline at end of file