From 7bc77cb1ed33745c720952c92b3b2747c5cbf2df Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Sat, 3 Feb 2018 11:01:52 +0530
Subject: Added new code

---
 3871/CH5/EX5.14/Ex5_14.sce | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 3871/CH5/EX5.14/Ex5_14.sce

(limited to '3871/CH5/EX5.14')

diff --git a/3871/CH5/EX5.14/Ex5_14.sce b/3871/CH5/EX5.14/Ex5_14.sce
new file mode 100644
index 000000000..ca30e2483
--- /dev/null
+++ b/3871/CH5/EX5.14/Ex5_14.sce
@@ -0,0 +1,27 @@
+//===========================================================================
+//chapter 5 example 14
+clc;clear all;
+
+//variable declaration
+V      =   250;     //voltage in V
+RA    = 100;            //resistance in  Ω
+RB    = 400;            //resistance in  Ω
+x     = 0.005;        //error in measuring voltage in 
+
+
+//calculations
+I     = V/(RA+RB);     //current flowing through resistance in A
+VB    = I*RB;              //potential drop acreoss resitance in V
+//Req   = RA+((r*RB)/(r+RB))
+//Ieq    =V/Req  = V/ RA+((r*RB)/(r+RB))
+//Ieq   = (V*(r+RB))/((RA*(r+RB))+(r*RB))
+//V1 = Ieq*(r*RB)/(r+RB)
+// V1  = (V*(r+RB))*(r*RB))/((r+RB)*((RA*(r+RB))+(r*RB)))
+//V1   = (V*r*RB)/((r+RB)*((RA*(r+RB))+(r*RB)))
+//V1   = (200*r)/(80+r)
+V1   = VB*(1-x);     //voltage measured with 0.5% error
+r     = (V1*80)/(200-V1);       //solving equations  we get minimum resistance in Ω
+
+//result
+mprintf("minimum resistance = %3.2f Ω",r);
+
-- 
cgit