summaryrefslogtreecommitdiff
path: root/343/CH4/EX4.13/ex4_13.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /343/CH4/EX4.13/ex4_13.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '343/CH4/EX4.13/ex4_13.sce')
-rwxr-xr-x343/CH4/EX4.13/ex4_13.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/343/CH4/EX4.13/ex4_13.sce b/343/CH4/EX4.13/ex4_13.sce
new file mode 100755
index 000000000..26e3db537
--- /dev/null
+++ b/343/CH4/EX4.13/ex4_13.sce
@@ -0,0 +1,18 @@
+clc
+r1=0.2 //Assigning values to parameters
+x1=0.75
+r2=0.05
+x2=0.2
+pf=0.8
+e2=125
+e1=250
+t=acosd(0.8)
+k=e2/e1
+kva=5
+i2=kva*1000/e2
+r02=r2+k*k*r1
+x02=x2+k*k*x1
+pr1=(i2*r02*cosd(t)-i2*x02*sind(t))*100/e2
+v2=e2-(e2*pr1/100)
+disp(pr1,"The percentage regulation at full load 0.8 pf leading is");
+disp("Volts",v2,"The secondary terminal voltage is"); \ No newline at end of file