blob: 967a5c8c9d889db71562fdf2a2137943e8d65ae1 (
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
|
//Book Name:Fundamentals of Electrical Engineering
//Author:Rajendra Prasad
//Publisher: PHI Learning Private Limited
//Edition:Third ,2014
//Ex2_4.sce.
clc;
clear;
R5=60;
a1=9;b1=-5;c1=0;d1=80; //these are the coefficient values of VA,VB,VC and the source obtained from node A in the given circuit
a2=-1;b2=7;c2=-2;d2=24; //these are the coefficient values of VA,VB,VC and the source obtained from node B in the given circuit
a3=0;b3=-3;c3=4;d3=36; //these are the coefficient values of VA,VB,VC and the source obtained from node C in the given circuit
del=det([a1 b1 c1;a2 b2 c2;a3 b3 c3]);
del1=det([d1 b1 c1;d2 b2 c2;d3 b3 c3]);
del2=det([a1 d1 c1;a2 d2 c2;a3 d3 c3]);
del3=det([a1 b1 d1;a2 b2 d2;a3 b3 d3]);
VA=del1/del; //Using Cramer's rule
VB=del2/del; //Using Cramer's rule
VC=del3/del; //Using Cramer's rule
Vba=VA-VB;
I5=VC/R5; // from Ohm's law
printf("\n Vba=%1.3f V \n",Vba)
//Answer vary dueto round off error
printf("\n Current through the 60 ohm resistor=%1.3f A \n",I5)
|
