diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /431/CH5/EX5.15/EX5_15.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '431/CH5/EX5.15/EX5_15.sce')
-rwxr-xr-x | 431/CH5/EX5.15/EX5_15.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/431/CH5/EX5.15/EX5_15.sce b/431/CH5/EX5.15/EX5_15.sce new file mode 100755 index 000000000..ada22f8e8 --- /dev/null +++ b/431/CH5/EX5.15/EX5_15.sce @@ -0,0 +1,27 @@ +//chapter 5
+//example 5.15
+//page 450
+clear;
+clc;
+disp("example 5.15");
+L=8000; //load
+La=5000;
+pf=0.8;
+phi=acosd(pf);
+printf("\ntan phi= %f\n",tand(phi));
+disp("FOR ALTERNATOR A");
+pf_a=0.9;
+phi_a=acosd(pf_a);
+printf("\ntan phi_a= %f\n",tand(phi_a));
+disp("reactive load=active load*tan phi");
+disp("Active load=8000kW");
+printf("reactive load= %d KVAr\n",(8000*tand(phi_a)));
+disp("Active Load A=5000kW\n");
+printf("Reactive load A= %dkVAr\n",(5000*tand(phi_a)));
+printf("Active load of B= %dkW\n",L-La);
+a=((8000*tand(phi))-(5000*tand(phi_a)))
+printf("Reactive load of B= %dkVAr\n",a);
+B=a/(L-La);
+phi_b=atand(B);
+printf("phi_b= %f\n",phi_b)
+printf("Power Factor of B= %f",cosd(phi_b));
\ No newline at end of file |