summaryrefslogtreecommitdiff
path: root/3802/CH2/EX2.10/Ex2_10.sce
blob: 82dcd5a6b8735d5455c2186ff6a2763adc41d9b7 (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
43
44
45
46
47
//Book Name:Fundamentals of Electrical Engineering
//Author:Rajendra Prasad
//Publisher: PHI Learning Private Limited
//Edition:Third ,2014

//Ex2_10.sce.

clc;
clear;
R1=4;
R2=3;
R3=5;
R4=6;

//CASE (a)
Vs1=80;
VA1=(Vs1/R3)/((1/R1)+(1/R2)+(1/R3)+(1/R4)); 
I1dash=VA1/R1;               //From ohm's law(V=IR)
I2dash=VA1/R2;
I3dash=(Vs1-VA1)/R3;
I4dash=VA1/R4;

//CASE (b)
Vs2=90;
VA2=(Vs2/R2)/((1/R1)+(1/R2)+(1/R3)+(1/R4));
I1doubledash=VA2/R1;
I2doubledash=(Vs2-VA2)/R2;
I3doubledash=VA2/R3;
I4doubledash=VA2/R4;

//CASE (c)
Is=20;
VA3=Is/((1/R1)+(1/R2)+(1/R3)+(1/R4));
I1tripledash=VA3/R1;
I2tripledash=VA3/R2;
I3tripledash=VA3/R3;
I4tripledash=VA3/R4;
I1=I1dash+I1doubledash+I1tripledash;
I2=-I2dash+I2doubledash-I2tripledash;
I3=I3dash-I3doubledash-I3tripledash;
I4=I4dash+I4doubledash+I4tripledash;
printf("\n  Current in 4 ohm resitance=%2.1f A \n",I1)
printf("\n  Current in 3 ohm resitance=%1.2f A \n",I2)
printf("\n  Current in 5 ohm resitance=%d A \n",I3)
printf("\n  Current in 6 ohm resitance=%2.1f A \n",I4)

//The answer vary dueto roundoff error