summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.5/ch1_ex_5.sce
blob: e429211339d314e446839aaf1e167c51c146249e (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
39
//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS 
//Example 5

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

//VARIABLE INITIALIZATION
r1=2;                         //in Ohms
r2=4;                         //in Ohms
r3=8;                         //in Ohms
r4=8;                         //in Ohms
r5=2;                         //middle resistance in Ohms

//SOLUTION

//To find resistance between a and c
req1=r1+r2; 
req2=r1+r4; 
req3=(req1*r1)/(req1+r1); 
req4=(req3*req2)/(req3+req2);
disp(sprintf("The eqiuvalent resistance between points a and c is %f Ω",req4));

//To find resistance between b and d
//converting delta abc into star 
//delta values
rab=r1;
rbc=r2;
rac=6;
//star values
r=rab+rbc+rac; 
ra=(rab*rbc)/r;
rb=(rab*rac)/r;
rc=(rbc*rac)/r;
req5=rb+rac; 
req6=rc+8;   
req7=ra+((req5*req6)/(req5+req6));
disp(sprintf("The eqiuvalent resistance between points b and d is %f Ω",req7));

//END