summaryrefslogtreecommitdiff
path: root/2384/CH10/EX10.12/ex10_12.sce
blob: bd302c8ee6f6a44dd9043934c48c163cc85971a2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// Exa 10.12
clc;
clear;
close;
format('v',6)
// Given data
Eb = 227;// in V
Rsh = 160;// in ohm
Ish = 1.5;// in A
I_L = 39.5;// in A
V = Ish*Rsh;// in V
Ia = I_L-Ish;// in A
//V = Eb + (Ia*Ra);
Ra = (V-Eb)/Ia;// in ohm
disp(Ra,"The armature resistance in ohm is");
Ia = V/Ra;// in A
disp(Ia,"The armature current in A is");