summaryrefslogtreecommitdiff
path: root/1529/CH20/EX20.2/20_02.sce
diff options
context:
space:
mode:
Diffstat (limited to '1529/CH20/EX20.2/20_02.sce')
-rwxr-xr-x1529/CH20/EX20.2/20_02.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1529/CH20/EX20.2/20_02.sce b/1529/CH20/EX20.2/20_02.sce
new file mode 100755
index 000000000..2c75e6fa9
--- /dev/null
+++ b/1529/CH20/EX20.2/20_02.sce
@@ -0,0 +1,11 @@
+//Chapter 20, Problem 2
+clc;
+R=30; //resistance of coil
+f=50; //supply frequency
+L=127.3e-3; //inductance of coil
+Ip=5.08; //line current
+Xl=2*%pi*f*L; //inductive reactance
+Zp=sqrt(R^2+Xl^2); //impedance of each phase
+Vp=Ip*Zp; //phase voltage
+Vl=sqrt(3)*Vp; //line voltage
+printf("Line voltage = %.2f V",Vl);