summaryrefslogtreecommitdiff
path: root/695/CH2/EX2.31/Ex2_31.txt
blob: 72573f0b43a0b6a03532fe21bca4def00435abc9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Caption:Determine the resistance to be inserted in series
//Exa:2.31
clc;
clear;
close;
V=200;//in volts
R_a=0.4;//in ohms
N_1=1000;//in rpm
N_2=800;//in rpm
I_a1=20;//in amperes
E_1=V-(I_a1*R_a);//in volts
I_a2=0.8*I_a1;//in amperes
E_2=N_2*I_a2*E_1/(N_1*I_a1);//in volts
R=-(E_2-193.6)/16;
disp(R,'the resistance to be inserted in series (in ohms)=')