summaryrefslogtreecommitdiff
path: root/1529/CH9/EX9.14/9_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '1529/CH9/EX9.14/9_14.sce')
-rwxr-xr-x1529/CH9/EX9.14/9_14.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/1529/CH9/EX9.14/9_14.sce b/1529/CH9/EX9.14/9_14.sce
new file mode 100755
index 000000000..2649fda47
--- /dev/null
+++ b/1529/CH9/EX9.14/9_14.sce
@@ -0,0 +1,16 @@
+//Chapter 9, Problem 14
+clc;
+N=1500; //no of turns
+phi=25*10^-3; //flux
+I=3; //current in coil
+dI=3-0; //change in current
+dt=150*10^-3; //change in time
+L=(N*phi)/I; //calculating inductance
+W=(1/2)*L*I^2; //calculating energy stored
+E=-L*(dI/dt); //calculating induced emf
+disp("(a)");
+printf("Inductance = %f H\n\n",L);
+disp("(b)");
+printf("Energy stored = %f J\n\n",W);
+disp("(c)");
+printf("Induced e.m.f = %d V",E);