summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.31/ch1_ex_31.sce
blob: f25c2ed94f5435cd15a84b58142d1f270ce4af7b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS 
//Example 31

disp("CHAPTER 1");
disp("EXAMPLE 31");

//VARIABLE INITIALIZATION
r1=6;                           //in Ohms
r2=4;                           //in Ohms
r3=4;                           //in Ohms
r4=4;                           //in Ohms
r5=6;                           //in Ohms
r6=6;                           //in Ohms
r7=6;                           //in Ohms
r8=8;                           //in Ohms
r9=4;                           //in Ohms
r10=10;                         //in Ohms
r11=10;                         //middle resistance in Ohms

//SOLUTION
//converting delta cde in a star
req1=r5+r6+r7;
req2=(r6*r7)/req1;
req3=(r5*r6)/req1;
req4=(r5*r7)/req1;

req5=r1+r2+r3;                  //on LHS of middle resistance
req6=r4+req2;                   //top LHS
req7=req4+r11;                  //equivalent middle resistance
req8=req3+r8+r9+r10;            //top RHS

req9=(req7*req8)/(req7+req8);   //(12 || 24)
req10=req9+req6;                //(12 || 24)+6
req11=(req5*req10)/(req5+req10);//(14 || 14)

disp(sprintf("The equivalent resistance between A and B is %d Ω",req11));

//END