1 files changed, 11 insertions, 0 deletions
diff --git a/343/CH4/EX4.25/ex4_25.sce b/343/CH4/EX4.25/ex4_25.sce
new file mode 100755
index 000000000..946decde7
--- /dev/null
+++ b/343/CH4/EX4.25/ex4_25.sce
@@ -0,0 +1,11 @@
+clc
+kva=5                //Assigning values to parameters
+e2=400
+r02=0.85
+x02=1.236
+i2f=kva*1000/e2
+t=acosd(0.8)
+pr1=(i2f*r02*cosd(t)+i2f*x02*sind(t))*100/e2
+pr2=(i2f*r02*cosd(t)-i2f*x02*sind(t))*100/e2
+disp(pr1,"The percentage regulation at full load 0.8 pf lagging is");
+disp(pr2,"The percentage regulation at full load 0.8 pf leading is");
+\ No newline at end of file