summaryrefslogtreecommitdiff
path: root/1445/CH8/EX8.24/ch8_ex_24.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH8/EX8.24/ch8_ex_24.sce')
-rw-r--r--1445/CH8/EX8.24/ch8_ex_24.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/1445/CH8/EX8.24/ch8_ex_24.sce b/1445/CH8/EX8.24/ch8_ex_24.sce
new file mode 100644
index 000000000..e330f4a03
--- /dev/null
+++ b/1445/CH8/EX8.24/ch8_ex_24.sce
@@ -0,0 +1,28 @@
+//CHAPTER 8- DIRECT CURRENT MACHINES
+//Example 24
+
+disp("CHAPTER 8");
+disp("EXAMPLE 24");
+
+//This example is same as example 19
+
+//VARIABLE INITIALIZATION
+v=250; //in Volts
+r_a=0.5; //in Ohms
+r_f=250; //in Ohms
+N1=600; //in rpm
+I_l=21; //in Amperes
+r=250; //in Ohms
+
+//SOLUTION
+I_f1=v/r_f;
+I_a1=I_l-I_f1;
+I_a2=2*I_a1;
+E_b1=v-(I_a1*r_a);
+E_b2=v-(I_a2*r_a);
+ratio=(r+r_f)/r_f;
+N2=(ratio*N1*E_b2)/E_b1;
+N2=round(N2);
+disp(sprintf("The new speed is %d rpm",N2));
+
+//END