1 files changed, 16 insertions, 0 deletions
diff --git a/343/CH3/EX3.9/ex3_9.sce b/343/CH3/EX3.9/ex3_9.sce
new file mode 100755
index 000000000..24451208c
--- /dev/null
+++ b/343/CH3/EX3.9/ex3_9.sce
@@ -0,0 +1,16 @@
+clc
+p=100000                   //Assigning values to parameters
+il=80
+vl=1100
+f=50
+vph=vl/sqrt(3)
+iph=il
+zph=vph/iph
+t=acosd(p/(sqrt(3)*vl*il))
+zph1=5.21-%i*6
+[r]=real(zph1)
+[xc]=abs(imag(zph1))
+c=1/(2*%pi*f*xc)
+disp("ohms",r,"The resistive circuit constant is")
+disp("ohms",xc,"The capacitive circuit constant is")
+disp("farads",c,"The capacitance is")
+\ No newline at end of file