summaryrefslogtreecommitdiff
path: root/1445/CH2/EX2.25/ch2_ex_25.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH2/EX2.25/ch2_ex_25.sce')
-rw-r--r--1445/CH2/EX2.25/ch2_ex_25.sce30
1 files changed, 30 insertions, 0 deletions
diff --git a/1445/CH2/EX2.25/ch2_ex_25.sce b/1445/CH2/EX2.25/ch2_ex_25.sce
new file mode 100644
index 000000000..0562848e1
--- /dev/null
+++ b/1445/CH2/EX2.25/ch2_ex_25.sce
@@ -0,0 +1,30 @@
+//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
+//Example 25 // read it as example 24 in the book on page 2.78
+
+disp("CHAPTER 2");
+disp("EXAMPLE 25");
+
+//VARIABLE INITIALIZATION
+V=350 //Amplitude in Volts
+f=50 //frquency in Hz
+t1=0.005 //sec after wave becomes zero again
+t2=0.008 //sec after waves passes tgrough 0 in -ve direction
+//SOLUTION
+//e=Esinwt
+//solution (a)
+//RAmplitude at 1/600 second after it becomes zero
+w=f*2*%pi; //angular speed
+v1=V*sin(w*t1);
+disp("SOLUTION (a)");
+disp(sprintf("Voltage after %f sec is %3f A", t1,v1));
+disp(" ");
+//solution (b)
+//since wave will pass in -ve direction after half period
+hp=1/(2*f); //half period, the point where sine beomes zero again after origin
+t=hp+t2;
+v2=V*sin(w*t);
+disp("SOLUTION (b)");
+disp(sprintf("The voltage would be %f V %3f sec", v2,t));
+//
+//END
+