1 files changed, 14 insertions, 0 deletions
diff --git a/1529/CH21/EX21.20/21_20.sce b/1529/CH21/EX21.20/21_20.sce
new file mode 100755
index 000000000..f8f27ea68
--- /dev/null
+++ b/1529/CH21/EX21.20/21_20.sce
@@ -0,0 +1,14 @@
+//Chapter 21, Problem 20
+clc
+c=4e3                       //coper loss
+p=500e3                     //transformer rating
+r=2.5e3                     //iron loss
+pf=0.75                     //power factor
+x=sqrt(r/c)
+eff=x*p
+los=2*r
+po=eff*pf
+pi=po-los
+n=(1-(los/pi))*100
+printf("(a) The Output KVA at maximum efficiency = %.2f kVA\n\n",eff/1000)
+printf("(b) Maximum efficiency = %.2f percent",n)