1 files changed, 15 insertions, 0 deletions
diff --git a/620/CH26/EX26.8/example26_8.sce b/620/CH26/EX26.8/example26_8.sce
new file mode 100644
index 000000000..43ed4c2b0
--- /dev/null
+++ b/620/CH26/EX26.8/example26_8.sce
@@ -0,0 +1,15 @@
+r=300;
+x_l=400;
+v=120;
+f=60;
+disp("Part a");
+p=v^2/r;
+disp("the true power (in W) is"); disp(p);
+disp("Part b");
+q=v^2/x_l;
+disp("the reactive power (in VAr) is"); disp(q);
+disp("Part c");
+s=sqrt(p^2+q^2);
+disp("the apparent power (in VA) is"); disp(s);
+i=s/v;
+disp("the current drawn (in A) from the supply is"); disp(i);
+\ No newline at end of file