summaryrefslogtreecommitdiff
path: root/1445/CH8/EX8.29/ch8_ex_29.sce
blob: ee4e53e7d5a47e758d2d58e1e6e8aea28c4d9b56 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//CHAPTER 8- DIRECT CURRENT MACHINES
//Example 29

disp("CHAPTER 8");
disp("EXAMPLE 29");

//VARIABLE INITIALIZATION
r_a=1;                      //in Ohms
N1=800;                     //in rpm
v_t=200;                    //in Volts
I_a=15;                     //in Amperes
r_s=5;                      //series resistance in Ohms

//SOLUTION
E_b1=v_t-(I_a*r_a);
E_b2=v_t-I_a*(r_a+r_s);
N2=(E_b2/E_b1)*N1;
N2=round(N2);               //to round off the value
disp(sprintf("The speed attained after connecting the series resistance is %d rpm",N2));

//END