From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2384/CH1/EX1.10/ex1_10.sce | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100755 2384/CH1/EX1.10/ex1_10.sce (limited to '2384/CH1/EX1.10/ex1_10.sce') diff --git a/2384/CH1/EX1.10/ex1_10.sce b/2384/CH1/EX1.10/ex1_10.sce new file mode 100755 index 000000000..3fa92acd2 --- /dev/null +++ b/2384/CH1/EX1.10/ex1_10.sce @@ -0,0 +1,25 @@ +// Exa 1.10 +clc; +clear; +close; +format('v',7) +// Given data +R1= 5;// in ohm +R2= 5;// in ohm +R3= 10;// in ohm +R4= 10;// in ohm +R5= 5;// in ohm +V1= 50;// in V +V2= 20;// in V +//Applying KCL at node A: VA*(R1*R3+R3*R2+R2*R1)+VB*-R1*R3 = V1*R2*R3 (i) +//Applying KCL at node B: VA*R4*R5+VB*-(R2*R4+R4*R5+R5*R2) = -V2*R2*R4 (ii) +A=[(R1*R3+R2*R3+R2*R1) R4*R5; -R1*R3 -(R2*R4+R4*R5+R5*R2)] +B= [V1*R2*R3 -V2*R2*R4]; +V= B*A^-1;// Solving eq(i) and (ii) by Matrix method +VA= V(1);// in V +VB= V(2);// in V +I_through_R3= VA/R3;// in A +I_through_R4= VB/R4;// in A +disp(I_through_R3,"The current in R3 in A is : ") +disp(I_through_R4,"The current in R4 in A is : ") + -- cgit