1 files changed, 19 insertions, 0 deletions
diff --git a/1319/CH12/EX12.12/i_12.sce b/1319/CH12/EX12.12/i_12.sce
new file mode 100644
index 000000000..db2b5b2fb
--- /dev/null
+++ b/1319/CH12/EX12.12/i_12.sce
@@ -0,0 +1,19 @@
+// To Compute the resistor, when operating voltage is altered.
+
+clc;
+clear;
+
+V=120;
+P=100;
+
+Rd=(V^2)/P;
+
+Vr=80; // Reduced voltage
+
+Ir= Vr/Rd;// Reduced current
+
+Rt=V/Ir; // The Total Resistance required to circulate the reduced current.
+
+Re= Rt-Rd; // External resistance required.
+
+disp('ohms',Re,'The external resistance required to be connected in series to operate at 80V')