summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.35/ch1_ex_35.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH1/EX1.35/ch1_ex_35.sce')
-rw-r--r--1445/CH1/EX1.35/ch1_ex_35.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/1445/CH1/EX1.35/ch1_ex_35.sce b/1445/CH1/EX1.35/ch1_ex_35.sce
new file mode 100644
index 000000000..08039d13a
--- /dev/null
+++ b/1445/CH1/EX1.35/ch1_ex_35.sce
@@ -0,0 +1,27 @@
+//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS
+//Example 35
+
+disp("CHAPTER 1");
+disp("EXAMPLE 35");
+
+//VARIABLE INITIALIZATION
+I=10; //current source in Amperes
+v=10; //voltage source in Volts
+r1=4; //top resistance in Ohms
+r2=4; //right resistance in Ohms
+r3=4; //bottom resistance in Ohms
+r4=6; //left resistance in Ohms
+r5=1; //in Ohms
+
+//SOLUTION
+res=I+(v/r1);
+va=res/((1/r4)+(1/r1));
+vb=(v/r2)/((1/r2)+(1/r3));
+vth=va-vb;
+req1=(r1*r4)/(r1+r4);
+req2=(r2*r3)/(r2+r3);
+rth=req1+req2;
+Ith=vth/(rth+r5);
+disp(sprintf("By Thevenin Theorem, the current through 1Ω resistor is %f A",Ith));
+
+//END