From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1118/CH26/EX26.8/eg26_8.sce | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100755 1118/CH26/EX26.8/eg26_8.sce (limited to '1118/CH26/EX26.8/eg26_8.sce') diff --git a/1118/CH26/EX26.8/eg26_8.sce b/1118/CH26/EX26.8/eg26_8.sce new file mode 100755 index 000000000..4e7849668 --- /dev/null +++ b/1118/CH26/EX26.8/eg26_8.sce @@ -0,0 +1,27 @@ +clear; +//clc(); +vl=400; +il=36; +pf=0.8; + +p1=sqrt(3)*vl*il*pf; +op=15*746; +eff=0.85; +p2=op/eff; + +//as per ques 26.7 +p1=19.953; +p2=12.979; +q1=acosd(0.8); +q2=acosd(0.92); +qm=((p1*tand(q1)) - (p1+p2)*tand(q2))/p2; +pf=cosd(atand(qm)); +printf("The power factor is:%.4f leading\n",pf); + + +lkvar=p2*(qm); +printf("The kVAr is:%.3f kVAr\n",lkvar); + + +kva=sqrt(p2*p2 + lkvar*lkvar); +printf("The kVA is:%.0f kVA\n",kva); -- cgit