1 files changed, 20 insertions, 0 deletions
diff --git a/3775/CH3/EX3.1/Ex3_1.sce b/3775/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..a019e6bf9
--- /dev/null
+++ b/3775/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,20 @@
+//Ex 3.1 page 117
+
+clc;
+clear;
+close;
+
+R=100;// ohm
+Vs=230;// V
+f=50;// Hz
+alpha=45;// degree
+
+Vo=Vs*sqrt(2)/2/%pi*(1+cosd(alpha));// V
+Io=Vo/R;// A
+printf('Average current = %.4f A',Io)
+Vor=Vs/sqrt(2)*sqrt(1/180*((180-alpha)+sind(2*alpha)/2));// V
+Ior=Vor/R;// A
+P=Ior**2*R;// W
+printf('\n Power delivered = %.2f W',P)
+
+//Ans in the textbook is not accurate.