blob: bf838785f7b41ba1b43fb4178f46347b93485746 (
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
40
41
42
|
// To calculate current in each branch of the given network.
clc;
clear;
// Refer diagram (a) in the book
R1=6;// one of the resistance between a and b
R2=3;// one of the resistance between a and b
R3=8;// resistance between c and a
R4=15;// resistance in the middle branch
R5=4;// resistance between d and e
V=40;
Rab=(R1*R2)/(R1+R2);// Effective resistance between a and b
Rcb= Rab+R3;// Effective resistance of the top branch between c and b
Reff=(Rcb*R4)/(Rcb+R4);
Rt=Reff+R5;
I=V/Rt;
I1=I*(Rcb/(Rcb+R4));
I2=I*(R4/(Rcb+R4));
I3=I2*(R2/(R1+R2));
I4=I2*(R1/(R1+R2));
disp('amperes',I,'The current through 4 ohm resistor =')
disp('amperes',I1,'The current through 15 ohm resistor =')
disp('amperes',I2,'The current through 8 ohm resistor =')
disp('amperes',I4,'The current through 3 ohm resistor =')
disp('amperes',I3,'The current through 6 ohm resistor =')
|