summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.27/ch1_ex_27.sce
blob: 9107672623c0deecdd91cef6749cbdd02a825721 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS 
//Example 27

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

//VARIABLE INITIALIZATION
I1=5;                          //current source in Amperes
vb=100;                        //voltage source in Volts
r1=20;                         //in Ohms
r2=10;                         //in Ohms
r3=20;                         //in Ohms

//SOLUTION
va=I1*r1;
vth=va-vb;                     //vth=vab
rth=r1+((r3*0)/(r3+0));
I=vth/(rth+r2); 
disp(sprintf("By Thevenin Theorem, the value of I is %d A",I));

//END