diff options
Diffstat (limited to '2672/CH1/EX1.47/Ex1_47.sce')
| -rwxr-xr-x | 2672/CH1/EX1.47/Ex1_47.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2672/CH1/EX1.47/Ex1_47.sce b/2672/CH1/EX1.47/Ex1_47.sce new file mode 100755 index 000000000..680c58433 --- /dev/null +++ b/2672/CH1/EX1.47/Ex1_47.sce @@ -0,0 +1,24 @@ +//Example 1_47
+clc;
+clear;
+close;
+format('v',5);
+//given data :
+V1=6;//V
+V2=5;//V
+V3=8;//V
+R1=2;//ohm
+R2=2;//ohm
+R3=5;//ohm
+R4=4;//ohm
+//Node A :
+VA=poly(0,'VA');
+I1=(V1-VA)/R1;//A
+I2=(V2-VA)/R2;//A
+I3=(V3+VA)/R3;//A
+//KCL at Node A
+eqn=I1+I2-I3;
+VA=roots(eqn);//V
+VB=-V3;//V
+I3=(VA-VB)/R3;//A
+disp(I3,"Current flowing through 5 ohm Resistance(A)");
|