1 files changed, 11 insertions, 0 deletions
diff --git a/343/CH2/EX2.40/ex2_40.sce b/343/CH2/EX2.40/ex2_40.sce
new file mode 100755
index 000000000..834befe93
--- /dev/null
+++ b/343/CH2/EX2.40/ex2_40.sce
@@ -0,0 +1,11 @@
+clc
+function v=f(t), v=200*sin(377*t), endfunction         //Defining functions
+function i=f1(t), i=8*sin(377*t-%pi/6), endfunction
+V=200/sqrt(2);              //Assigning values to parameters
+I=8/sqrt(2);
+P=V*I*cos(%pi/6)
+disp("Watts",P,"Active Power");
+Q=V*I*sin(%pi/6);
+disp("VAR",Q,"Reactive Power");
+S=V*I;
+disp("VA",S,"Apparent Power");
+\ No newline at end of file