blob: f87c876a50d59281392b5b566eb3313254fbab09 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
// Example 2.5 :Thevenin's and Norton's Equivalent
clc;
close;
format('v',7)
clear;
// given :
vs1=10;//voltage in volts
R1=50;//resistance in ohms
R2=50;//resistance in ohms
R3=25;//resistance in ohms
disp("(a) Applying Thevenins Theorem ")
voc=(R1/(R1+R2))*vs1;//voltage in volts
req=((R1*R2)/(R1+R2))+R3;//resistance in ohms
disp(voc,"Thevenin equivalent open circuit voltage is, (V)=")
disp(t=req,"Thevenin equivalent resistance is,(Ohm)=")
disp("(b) Applying Nortons Theorem ")
Isc=((vs1)/(R1+(R1*R3)/(R1+R3)))*(R1/(R1+R3));//
req=((R1*R2)/(R1+R2))+R3;//resistance in ohms
disp(Isc,"Norton short circuit current is,(A)=")
disp(t=req,"Norton equivalent resistance is,(Ohm)=")
|