summaryrefslogtreecommitdiff
path: root/3504/CH2/EX2.4/Ex2_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3504/CH2/EX2.4/Ex2_4.sce')
-rw-r--r--3504/CH2/EX2.4/Ex2_4.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/3504/CH2/EX2.4/Ex2_4.sce b/3504/CH2/EX2.4/Ex2_4.sce
new file mode 100644
index 000000000..f64a1358c
--- /dev/null
+++ b/3504/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,10 @@
+//To find the power dissipated in the resistor R in the ladder network shown in the given figure.
+clc;
+R=1 //Resistance(ohm)
+Z=[2 -1 0;-1 3 -1;0 -1 3]
+D=det(Z)
+Z_2=[2 1 0;-1 0 -1;0 0 3]
+D_2=det(Z_2)
+i_2=D_2/D //Current(A)
+P=(i_2)^2*R
+disp(P,'Power dissipated in the resistor R(W)')