1 files changed, 19 insertions, 0 deletions
diff --git a/3836/CH18/EX18.2/Ex18_2.sce b/3836/CH18/EX18.2/Ex18_2.sce
new file mode 100644
index 000000000..d3646ac9f
--- /dev/null
+++ b/3836/CH18/EX18.2/Ex18_2.sce
@@ -0,0 +1,19 @@
+clear
+//
+
+//Initialisation
+l=400*10**-3               //inductance in henry
+i1=300                     //current in milliamp
+r=20                       //resistance in ohm
+v=15                       //volt
+t1=25                       //time in seconds
+e=2.71828                  //mathematical constant
+
+//Calculation
+T=l/r                     //time in seconds
+i=(v*r**-1)*10**3         //current in amp
+t2=((log(i/(i-i1)))/(log(e)))*0.02  //expression to find time t
+
+//Result
+printf("\n t = %.1f mSec",t2*10**3)
+