summaryrefslogtreecommitdiff
path: root/2360/CH5/EX5.14/ex5_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '2360/CH5/EX5.14/ex5_14.sce')
-rwxr-xr-x2360/CH5/EX5.14/ex5_14.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/2360/CH5/EX5.14/ex5_14.sce b/2360/CH5/EX5.14/ex5_14.sce
new file mode 100755
index 000000000..d652b8e14
--- /dev/null
+++ b/2360/CH5/EX5.14/ex5_14.sce
@@ -0,0 +1,22 @@
+// Exa 5.14
+format('v',7);clc;clear;close;
+// Given data
+P = 10;// in ohm
+Q = 10;// in ohm
+S = 10;// in ohm
+// For first balance
+p = 30000;// in ohm
+q = 25000;// in ohm
+R_AB = (P*p)/(P+p);// in ohm
+R_BC = (Q*q)/(Q+q);// in ohm
+// R_AB*R = R_BC*S;
+R = (R_BC/R_AB)*S;// in ohm
+disp(R,"The value of R for first balance in Ω is");
+// For second balance
+p = 15000;// in ohm
+q = 40000;// in ohm
+R_AB = (P*p)/(P+p);// in ohm
+R_BC = (Q*q)/(Q+q);// in ohm
+// R_AB*S = R_BC*R;
+R = (R_AB/R_BC)*S;// in ohm
+disp(R,"The value of R for second balance in Ω is");