1 files changed, 14 insertions, 0 deletions
diff --git a/2075/CH8/EX8.3/pe8_3.sce b/2075/CH8/EX8.3/pe8_3.sce
new file mode 100755
index 000000000..c259f0926
--- /dev/null
+++ b/2075/CH8/EX8.3/pe8_3.sce
@@ -0,0 +1,14 @@
+//example 8.3
+clc;funcprot(0);
+//Initialization of Variable
+V=220;//line voltage
+f=50;//hertz
+R=80;//load resistance
+K=50;//di/dt
+pi=3.1428;
+//calculation
+L=V*2^.5/K;
+disp(L,"inductance in microH:")
+Z=2*pi*f*L;
+disp(Z*1e-6,"load impedence at angle 90 degree in ohm")
+clear()