summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.2/ch1_ex_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH1/EX1.2/ch1_ex_2.sce')
-rw-r--r--1445/CH1/EX1.2/ch1_ex_2.sce30
1 files changed, 30 insertions, 0 deletions
diff --git a/1445/CH1/EX1.2/ch1_ex_2.sce b/1445/CH1/EX1.2/ch1_ex_2.sce
new file mode 100644
index 000000000..28ef5e3aa
--- /dev/null
+++ b/1445/CH1/EX1.2/ch1_ex_2.sce
@@ -0,0 +1,30 @@
+//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS
+//Example 2
+
+disp("CHAPTER 1");
+disp("EXAMPLE 2");
+
+//VARIABLE INITIALIZATION
+//converting star with points A, C and D into delta ACD
+//star values
+ra=2;
+rc=4;
+rd=3;
+
+//SOLUTION
+//delta values
+r=(ra*rc)+(rc*rd)+(rd*ra);
+rac=r/rd;
+rcd=r/ra;
+rad=r/rc;
+req1=(5*rad)/(5+rad); //equivalent resistance between A and D
+req2=(4*rcd)/(4+rcd); //equivalent resistance between C and D
+req3=req1+req2; //req1 and req2 are in series
+req4=(req3*rac)/(req3+rac); //req3 and rac are in parallel
+req5=req4+6;
+req6=(req5*7)/(req5+7);
+disp(sprintf("The eqivalent resistance between points A and B is %f Ω",req6));
+
+//END
+
+