1 files changed, 17 insertions, 0 deletions
diff --git a/3754/CH9/EX9.5/9_5.sce b/3754/CH9/EX9.5/9_5.sce
new file mode 100644
index 000000000..1bfc68c91
--- /dev/null
+++ b/3754/CH9/EX9.5/9_5.sce
@@ -0,0 +1,17 @@
+clear//
+
+//Variables
+
+IS = 30.0                //Current (in milli-Ampere)
+RS = 15.0                //Source resistance (in kilo-ohm)
+
+//Calculation
+
+RL = RS / 20.0           //Load Resistance (in kilo-ohm) 
+IL = IS * RS/(RL +RS)    //Load Current (in Ampere)
+
+
+//Result
+
+printf("\n Largest value of load resistance to provide constant current is  %0.3f  ohm.",RL*10**3)
+printf("\n Variation of current from the short-cicuit current is  %0.4f .",(IS-IL)/IS)