diff options
Diffstat (limited to '1529/CH20/EX20.2/20_02.sce')
-rwxr-xr-x | 1529/CH20/EX20.2/20_02.sce | 11 |
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);
|