summaryrefslogtreecommitdiff
path: root/1118/CH26/EX26.3/eg26_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '1118/CH26/EX26.3/eg26_3.sce')
-rwxr-xr-x1118/CH26/EX26.3/eg26_3.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1118/CH26/EX26.3/eg26_3.sce b/1118/CH26/EX26.3/eg26_3.sce
new file mode 100755
index 000000000..f009c338c
--- /dev/null
+++ b/1118/CH26/EX26.3/eg26_3.sce
@@ -0,0 +1,11 @@
+clear;
+//clc();
+
+p=750/3;
+v=400;
+q1=acosd(0.7);
+q2=acosd(0.95);
+qcp=p*(tand(q1)-tand(q2));
+printf("The kVAr is:%.3f kVAr\n",qcp);
+cap=qcp*1000/(v*v*2*(%pi)*50);
+printf("The capacitance is:%.0f uF\n",cap*1000000);