diff options
Diffstat (limited to '608/CH9/EX9.09/9_09.sce')
| -rwxr-xr-x | 608/CH9/EX9.09/9_09.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/608/CH9/EX9.09/9_09.sce b/608/CH9/EX9.09/9_09.sce new file mode 100755 index 000000000..90a6252fd --- /dev/null +++ b/608/CH9/EX9.09/9_09.sce @@ -0,0 +1,12 @@ +//Problem 9.09: An e.m.f. of 1.5 kV is induced in a coil when a current of 4 A reduced to 0 A in a 8 ms. find the inductance of the coil.
+
+//initializing the variables:
+E = 1500; // in Volts
+dt = 0.008; // Change of time in sec
+dI = 4; // change of current in A/s
+
+//calculation:
+L = abs(E)*dt/dI
+
+printf("\n\n Result \n\n")
+printf("\n Inductance L = %.0f H\n",L)
\ No newline at end of file |